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GESPAC Gives You 
68000 Performance at 8-bit Prices. 




Introducing another Price / Performance 
breakthrough from GESPAC: A complete 68000 
CPU module for $395 unit price. The GESMPU-48. 

Wherever you thought of using an 8-bit 
microprocessor to do a job, you can now use the 
16/32-bit GESMPU-48 instead. It will do the job, 
better, faster, and best-of-all for the same money. 

On a single height Eurocard, we have packed an 
8 MHz 68000 microprocessor (16 MHz optional), 
four sockets for up to 64 Kilobytes of zero-wait-states 
CMOS RAM and up to 128 Kilobytes of EPROM, 
one RS-232 serial port, and three 16-bit timers. 

The GESMPU-48 is fully expandable through 
the standard G-64 bus, to accommodate up to 
16 Megabytes of external memory. You can odd 
any of more than 300 I/O modules available from 
GESPAC and a growing numbers of independent 
G-64 bus vendors. 

To make your programming tasks easier, 
GESPAC supports the GESMPU-48 with the OS-9® 
and PDOS® real-time, multi-tasking operating 
systems and most popular high level languages 
and software development tools. 




.00 



Single Quonlity 






L*£3£at ic3t : 



Mf*U~49 SN1000301 

Actual Size 



If you too like the idea of getting more for 
ess, contact us today to receive information 
on the GESMPU-48 and the G-64 bus concept 
from GESPAC— the leader in single Eurocard 
microcomputer products worldwide. 

Call Toll Free 1-800-4-GESPAC 
or Call (602) 962-5559. 
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IN USA -CANADA 

50A West Hoover Ave. 
Mesa, Arizono 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONAL 

3, chemin des Aolx 
CH-1 228 Geneva 
Tel. (022) 713400 
Telex 429989 
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_ WWW j£ inC. 1337 WEST 37th PLACE 

GMX MICRO 20 PRICE LIST 

MICRO 20 (12.5 rHz) M/l SAB 12565.00 

MICRO 20 (16.67 PUz) W/l SAB $2895.00 

micro 20 (20 rnz) w/i sab 13295.00 

OPTIONAL PARTS AMD ACCESSORIES 

68881RC12 $ 295.00 

68881RC16 1 395.00 

MOTOROLA 68020 USERS MANUAL $ 19.00 

MOTOROLA 68881 USERS AANIHL I 19.00 

SBC ACCESSFY PACKAGE («2<H*) $1690.00 

The package includes a PC -style cabinet with a 
custom backpanel a Xebec 1410A hard disk control- 
ler, a 25 Megabyte (unformatted) hard disk, a 
5 1/4- OSOD §0 track floppy disk drive, a 150 watt 
power supply, cooling fan, panel mounted reset and 
abort switch** and all necessary internal cabling 

BACK PAJCL PLATE (BPP-PC) For Above I 44.00 

2nd 5 a 80 FLIPPY i CABLES FOR M2<Hm\ ADO.. I 250.00 

SECOND 25MB HARD DISK t C/wXES, ADO $ 780.00 

TO SUBSTITUTE 85HB HD FOR 25*« HD, ADO.... II 800. 00 

I/O EXPANSION BOARDS 

16 PORT SERIAL CARD ONLY (S8C-16S) 1335.00 

The S8C-16S extends the I/O capabilities of the 
GMX Micro-20 68020 Single-board Computer by adding 
sixteen asynchronous serial I/O ports* By using 
two SBC-165 boards, a total of tKirty-six serial 
ports are possible. 

RS232 Adapter(SAB-25,SAB-9D or h\M5) $165.00 

The board provides level-shifting between TTL 
level and standard RS-232 signal levels for up to 
4 serial I/O ports. 

60 LINE PWALlEL I/O CARD (SBC-60P) $398.00 

The GMX S8C-60P uses three 68230 Parallel Inter- 
face/Timers (PI/Ts) to provide up to forty-eight 
parallel I/O lines. The I/O lines are buffered in 
six groups of eight lines each, with separate buf- 
fer direction control for each group. Buffer 
direction can be fixed by hardware jumpers, or can 
be software programmable for bidirectional applica- 
tions. 

PROTOTYPING BOARD (SBC-WU) $75.00 

The S8C-UU provides a means of developing and 
testing custoi I/O interface designs for the GMX 
Micro- lO 68020 Single-board Commuter. The board 
provides areas for both DIP (Dual Inline Package) 
and PGA (Pin Grid Array} devices, and a pre-wired 
memory area for up to 5I2K bytes of dynamic RAM. 

I/O BUS ADAPTER (SBC-BA) $195.00 

The SBC-BA provides an interface between the GMX 
Hicro-20 68020 Single-board Computer and the 
Motorola Input/Output Channel (1/0 bus). With the 
1/0 bus, up to sixteen off-the-shelf or custoi 
peripheral devices (I/O modules) can be connected 
to the GMX Hicro-20. 

AROCT LAN board w/o Software (SBC~AN)....$475*00 

The SBC -AM provides an interface between the 
GMX Micro-20 68020 Single-board Computer and the 
AROCT modified token-passing Local Area Network 
(LAN) originally developed by Oatapoint Corp. The 
AROCT is a baseband network with a data trans- 
mission rate of 2.5 Megabits/second. The standard 
transmission media is a single 93 ohm RG-62/U 
coaxial cable. Fiber optic versions are available 
as an option. 

OS9 LAN Software Drivers for SBC-AN $ 120.00 



CHICAGO, ILLINOIS 60809 • (312)927-5510 • TWX 910 221-4055 
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.$ 150.00 



THESE 68020 (TOUTING SYSTEMS ARE PRICED UrCN PUR- 
CHASED WITH TrC MICRO-20. PLEASE ADO $150.00 IF 
PUDttSED LATER FOR Ttf UPDATED PROffS AM) rWaJALS. 

0S9 

0S9/68020 PROFESSIONAL PAK $ 850.00 

Includes O.S./C", EDITOR^ASSJtTER, EMGER, 
development utilities, 68881 support. 

Other Software for OS-9/68020 

BASIC (included in PERS ON PAK ) $ 200.00 

C COffMLER (included in FTCFF55I0NAL PAK).$ 500.00 
PASCAL COrf>IL£R $ 500.00 

UNIFIEX 

UniFLEX (when ordered with Board) $ 450.00 

UniFLEX UI1H TOIL-TIME EfUmDOflS $1000.00 

Other Software for UniFLEX 

UniFLEX BASIC M/PRECOtPILER $ 300.00 

UniFlEX C COr^ILER $ 350.00 

UniFLEX COBOL COrt>ILER $ 750.00 

UniFLEX SCREEN EDITOR $ 150.00 

UniFLEX TEXT PROCESSOR $ 200.00 

UniFLEX SORT/rWGE PACKAGE $ 200.00 

UniFLEX VSM MODULE $ 100.00 

UniFLEX UTILITIES PACKAGE I $ 200.00 

UniFLEX PARTIAL SOtffcE LICENSE $1000.00 

GMX EXCLUSIVE VRSI0NS,CUSTGMI2ED FOR T>€ MICRO-20, 
OF T>€ 6EL0M LANGUAGES AND SOFTWARE ARE N.SO AVAIL- 
ABLE FROM GMX. 

ABSOTT FORTRAN (UniFLEXl $1500.00 

SCU.PTOR (specify UniFLEX or 0S9) $ 995.00 

FORI* (0S9) $ 595.00 

DVNACAX (specify UniFLEX or 0S9) $ 300.00 

GMX DOES NOT GUARANTEE PERFORMANCE OF Ml ONX 
SYSTEMS, BOARDS OR SOFTWARE lt€N USED UITH ODER 
MANUFACTURES PRODUCT. 

ALL PRICES ARE F.O.B. CHICAGO 

GMX, Inc. reserves the right to change pricing, 
terms, and products specifications at any time 
without further notice. 

TO ORDER BY NAIL: SEN QCOC OR MutCY ORDER OR 
USE YOLF VISA OR MASTER CHARGE, Please allow 
3 meeks for personal checks to clear. U.S. 
orders add $5 handling if under $200.00. 
Foreign orders add $10 handling if order is 
under $200.00. Foreign orders over $200.00 
will be shipped via Emery Air Freight DOLUCT, 
and we will charge no handling. All orders 
must be prepaid in U.S. funds. Please note 
that foreign checks have been taking about 8 
weeks for collection so we would advise 
wiring money, or checks drawn on a bank account 
in the U.S. Our bank is the Continental Illinois 
National Bank of Chicago. 231 S. LaSalle Street, 
Chicago, IL 60693, account number 73-32033. 

CONTACT GMX FOR MORE ItFOMATION ON THE ABOVE PRODUCTS 

GMX STILL SELLS GIMIX S50 BUS SYSTDtS, BOARDS i PARTS. 
CONTACT GMX FOR Of^ETE PRICE LIST. 
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68 MICRO JOURNAL 

Computer Publishing Center 

5900 Cassandra Smith Road 

PO Box 849 

Hixson,TN 37343 

Phone (615) 842*4600 Telex 510 600-6630 

Copyrighted <D 1987 by Computer Publishing, Inc. 

68 Micro Journal is published 12 times a year by Compuier 
Publishing Inc. Second Class Postage paid ISSN 0194-5025 at 
Hixson, TN. and additional entries. Postmaster send fonn 
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Items or Articles for Publication 

Articles submitted for publication must include authors name, 
adaress, telephone number, dale and a statement lhat the 
material is oiiginal and the property of the author. Articles 
submitted should be on diskette, OS-9, SK*DO§, FLEX, 
Macintosh or MS-DOS. All printed items should be dark type 
and satisfactory for photo-reproduction. No blue ink! No hand 
written articles - please! Diagrams o.k. 

Please - do not format with spaces any text indents* charts, etc. 
(source listing o.k.). We will edit in all formatting. Text should 
fall flush left and use a carriage return only to indicate a 
paragraph end. 

Letters & Advertising Copy 

Letteis to the Editor should be theoriginal copy , si gnedl Letters 
of grip as well as praise are acceptable. We reserve the right to 
reject any letter or advertising material, for any reason we 
deem advisable. Advertising Rates: Commercial please con- 
tact 68 Micro Journal Advertising Department. Classified 
advertising must be non-commercial. Minimum of $15.50 for 
first 15 words. Add $.60 per word thereafter. No classifieds 
accepted by telephone. 
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The VME BUS and OS-9: 



Ultimate Software 
for the Ultimate Bus 



Modularity, Flexibility, High Performance. Future growth. These are probably the prime reasons 
you chose the VME bus. Why not use the same criteria when selecting your system software? That's 
why you should take a took at Microware's OS-9/68000 Operating System— it's the perfect match tor the 
VME bus. 

When you're working with VME you must have access to every part of the system, Unlike other 
operating systems that literally scream KEEP OUT!, OS-9s open architecture invites you to create, adapt, 
customize and expand. Thanks to its unique modular design, OS-9 naturally fits virtually any system, 
from simple ROM-based controllers up to large multiuser systems 

And that's just the beginning of the story. OS 9 gives you a complete UNIX-application compatible 
environment. It is multitasking, real time, and extremely test And if you're still not impressed, 
consider thai a complete OS-9 executive and I/O driver package typically fils in less than 24K of 
RAM or ROM. 

Software tools abound for OS-9, including outstanding Microware C, Basic. Fortran, and 
Pascal compilers. In addition, cross C compilers and cross assemblers are available 
for VAX systems under Unix or VMS. You can also plug in other advanced options, 
such as the GSS-DRIVERS™ Virtual Device Interface for industry- 
standard graphics support, or the OS-9 Network File Manager lor 
high level, hardware-independent networking 

Designed for the most demanding OEM requirements. 
OS*9*s performance and reliability has been proven in an 
incredible variety of applications. There's nothing like a track 
record as proof: lo date, over 200 OEMs have shipped more 
than 100.000 OS-9-based systems. 

Ask your VME syslem supplier about OS-9. Or you can 
install and evaluate OS-9 on your own custom system with 
a reasonably priced Microware PortPak™. Contact Micro- 
ware loday. Well send you complete information about OS-9 
and a list of quality manufacturers who offer off-the-shelf 
VME/OS-9 packages 



MICROWARE. 

Microware Systems Corporation 

1866 NW 114th Street « Oes Moines. Iowa 50322 

Phone 515-224-1929 • Telex 910-520 2535 

Microware Japan, Ltd. 

41-19 Hortcho 4-Chome. Funabasru City • Chiba 273, 

Japan • Phone 0473 (26) 4493 • Telex 781-299-3122 





Modular Hardware Deserves Modular Software 
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DATA-COMP proudly presents the first 
Under $5000 "SUPER MICRO". 

The MUSTANC020~ 



MUSTANG-02& 



The MUSTANG020 68020 SBC 
provides a powerful, compact, 32 bit computer 
system featuring the "state of the art" Motorola 
68020 "super" micro-processor It comes 
standard with 2 megabyte of high-speed SIP 
dynamic RAM, serial and parallel ports, floppy 
disk controller, a SASI hard disk interface for 
intelligent hard disk controllers and a battery 
backed-up time-of-day clock. Provisions are 
made for the super powerful Motorola MC6888 1 
floating point math co-processor, for heavy math 
and number crunching applications. An optional 
network interface uses one serial (four (4) 
standard, expandable to 20) as a 125/bit per 
second network channel. Supports as many as 32 
nodes. 

The MUSTANG-020 is ideally suited to a 
wide variety of applications. It provides a cost 
effective alternative to the other MC68020 
systems now available. It is an excellent 
introductory tool to the world of hi-power, hi- 
speed new generation "super nucros". In 
practical applications it has numerous 
applications, ranging from scientific to education. 
It is already being used by government agencies, 
labs, universities, business and practically every 
other critical applications center, worldwide, 
where tiue multi-user, multi-tasking needs exist 
The MUSTANG 020 is UNIX C level V 
compatible. Whe e low cost and power is a must, 
the MUSTANG-020 is the answer, as many have 
discovered. Proving that price is not the standard 
for quality! 

As a software development station, a 
general purpose scientific or small to medium 
business computer, or a super efficient real-time 
controller in process control, the MUSTANG- 
020 is the cost effective choice. With the optional 
MC6888 1 floating point math coprocessor 

installed, it has the capability of systems costing 
many times over it's total acquisition cost 



DATA-COMP ^ 






With the DATA COMP "totaJ package", 
consisting of a heavy duty metal cabinet, 
switching power supply with if/line by-passing, 
5 inch DS/DD 80 track floppy, Xebec hard disk 
controller, 25 megabyte Winchester hard disk, 
four serial RS-232 ports and a UNIX C level V 
compatible multi-tasking, multiuser operating 
system, the price is under $5000, w/12.5 
megahertz system clock (limited time offer). 
Most all popular high level languages are 
available at very reasonable cost. The system is 
expandable to 20 serial ports, at a cost of less 
than $65 per port* in multiples of 8 port 
expansion options. 

The system SBC fully populated, quality 
tested, with 4 serial ports pre-wired and board 
mounted is available for less that $3000. Quantity 
discounts are available for OEM and special 
applications, in quantity. All that is required to 
bnng to complete "system" standards is a 
cabinet, power supply, disks and operating 
system. All these are available as separate items 
from DATA-COMP. 
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A special version of the Motorola 020- 
BUG is installed on each board. 020-BUG is a 
ROM based bebugger package with facilities for 
downloading and executing user programs from 
a host system. It includes commands for display 
and modification of memoiy, breakpoint 
capabilities, a powerful assembler/disassemble 
and numerous system diagnostics. Various 020- 
BUG system routines, such as I/O handlers are 
available for user programs. 

Normal system speed is 3-4.5 MIPS, with 
burst up to 10 MIPS, at 16.6 megaheitz. 
Intelligent I/O available for some operating 
systems. 

Hands-on "actual experience sessions", 
before you buy, are available from DATA- 
COMP. Call or write for additional information 
or piicing. 
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12.5 Mhr (optional 16.6 MKi available) MCX6Q20 full 32-bll wide paih 

32*bl* wide data and address buses, oon- multiplexed 

on chip Instruction cache 

object codecompalible with all 68XXX family pnxfc3*ors 

enhanced Inslnietiooset - math Co- promaor interface 

66681 math hl-spced floating point co-pfocssBor (optional) 

direct etteuskin of full Instruction set 

full support IEEE draft 1(U> 

transcendental and other scientific math functions 

2 Megabyte of SIP (512 a Ubllorginftalion) 

up to 2S6K bylea of EPROM (M x 32 bits) 

4 Asynchronous UO port* standard 
optional to 20 testa! ports 
standard RS.232 interface 
optional network interface 
buffeted 6 bit parallel port (1/2 MC66230) 
Centronics type plnout 
expansion connector for VO devices 
16 b t data path 
256 byte address space 
2 interrupt Input* 
dock and control signals 
Motorola I/O Channel Modules 
lime of day dock/calendar w/battery backup 
controller for 2, 5 1/4** floppy disk drives 
single or double side, single «r double density 
3$ to 80 track seleciab le (48-96 TV I) 
SASI interface 

programmable periodic interrupt generator 
interrupt from micro-seconds to seconds 
high ly accurate time base (5 PPM) 

5 bit sense switch, readable by the CPU 
Hardware slngie**tep capability 
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Cabinet w/swUddnt PS 

5^ -66 track floppy 

Ftoopy cable 

OS-9 66K Vef. 

• Includes C CompUrr (S5QO.90) 
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UniFLEX 

MC6888 1 f/p math 

16,67 MC68020 

16.67 MQ68881 

20 Mh2 MC68020 Sys 

Note all 68881 chips work with 20 
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Data-Comp Division 

^J : T^ B^N, A Pcc*de of Quality Service' ^ 

Computer Pubii*hlng t Jnc, 5000 Coscsndra Smith Road 
Tatophona 15 842-4601 - Tatar 510 600-6630 Hixson, Tn 37343 
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NOTE: Only Professional OS-9 

now available (68020 Version) 

Includes ($500.00) C Compiler 

68020 & 68881 supported 

complete 

Mbyte HD System 

$4299.80 

Mbyte HD System 
$5748.80 
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PAT FROM S. E. MEDIA -- A FULL FEATURED SCREEN ORIENTED TEXT EDITOR 

with all the best of PIE. For those who swore by and loved PIE, this is for YOU! All PIE 
features & much more! Too many features to list. And if you don't like ours, change or add 
your own. C source inctuded. Easily configured to your CRT terminal, with special configuration 
section. No sweat! 

68008 - 68000 - 68010 - 68020 OS-9 68K $229.00 



COMBO 



PATiJUST 

Special $249.00 

JUST 

JUST from S. E. MEDIA - - Text formatter written by Ron Anderson; for dot matrix 
printers, provides many unique features. Output formatted to the display. User con- 
figurable for adapting to other printers. Comes set-up for Epson MX80 with Graflex. Up 
to 10 imbedded printer control commands. Compensates for double width printing. 
Includes normal line width, page numbering, margin, indent, paragraph, space, vertical 
skip lines, page length, centering, fill, justification, etc. Use with PAT or any other text 
editor. The ONLY stand alone text processor for the 68XXX OS-9 68K, that we have 
seen. And at a very LOW PRICE! Order from: S.E. MEDIA - see catalog this issue. 

68008 - 68000 - 68010 - 68020 OS-9 68K 
y With 'C source $79.95 J 
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An Ace of a System in Spades! The New 

MUSTANG-08/A 

Now with 4 serial ports standard & speed Increase to 12 Mhz CPU + on board battery 
backup and Includes the PROFESSIONAL OS-9 package - including the $500.00 OS-9 

C compiler! This offer won't last forever! 



NOT 128K, NOT 512K 
FULL 768K No Wait RAM 

Trie MUOTANG06™ system look every hand from all 
other 68008 syserns we tested, running OS-9 68Kf 

Die MU5TAN&08 indudes OS^68K™ andtor Peter 
Stark's SK'DOS. SKTJOS is a single user single tasking 
system that takes up where *FLEX T " left off. SrODOS is 
actual a 68XXX FLEX type system (Not a ISC pvduct) 

ie OS-9 6£K system ; © a M QtownrrmiltHtserrtriuli- ^v 
68XXx/systern, Al Bpe popular 68000 O^-IKsqftware J 
is a s/eetf wto on disk LO. Fact ig the WSTANG*0s/ 
_ is fasted on disjn acces^ tharj some otter 68XXX\sy$tems atej 
|^ciijKe™ry^che r 3CceS5 : Now.lJhat la fa^r' And.lhfls tf jusVa^ 
iarparfo4Uie story* See benchmarks. — ^ 

System Includes 06-9 68K or SK*DOS - Your Chofci? 

Specifications: 



Now even faster! 
with 12 Mhz CPU 



C Compile tinea 0S4 68K. Hard Disk 

MUSTANG* 8 Ma CPU 0min~32sec 

Olhar popular 68006 system 1 mJn - 05 sec 

MUSTAM&020 0mJn-21sec 



^ 



J 




CPU 
RAM 

PORTS 

aocK 

EPflOM 
FLOPPY 
HARD DISK 



MC®008 
768K 

NoYVtf Sttes 
4-RS32 
2-8brt RaraH 
MC146818 
l6K.32KorWK 
W01772 
kriartifs Port 



12 Mhz 
256KCr*G 

MC6981 DUAFT 
MC6821 Pfc 

Real True Ox* Bal. 
Selectable 
5 1/4 Drvas 
WD10Q2 Bead 



a 25 Megabyte 
^ Hard Disk System 

$1,998.90 

Complete with PROFESSIONAL OS4 

Includes the $500.00 C compiler, PC 

style cabinet, heavy duty power supply, 

5" DDDS 80 track floppy - Ready to Rim 



au 



V Now more serial ports - faster CPU Ba£\ 
} teiy B/U - and $850.00 OS-9 Ptofes- | 

- atonal with C compiler Included! , sp^ ^ ai ^^^ purposes) to be utilized, v 

. ^*" ^- — — ^™ ^™ ^™ ™™ ~™ ^™ ™™ ^~ ^™ — — ■ p ™ 1 **• ^~ ^~ ^~ •"'^ 9w^2^4a *rs *Ka i kat to r*wni ifev4 a#vH r^CAn/tkH 



Unike other 68008 systems there are several significant 
differences. Die MUSTANG-08 is a full 12 Megahertz system. The 
RAM uses UO wait stales, this means ful bore MUSTANG type 
performance. 

Also, albwng for addressable ROMPROM the RAM is the 
maximum alowed for a 68008. The 68008 can only address a 
total of 1 Megabytes of RAM. The design albws all the RAM 



$400.00 



See MuSanrjC2 Ad - page 5 
for trade-in details 




MUSTANG-08 



LOOK 



Othor 68008 8 Mtt 08*9 68K. , 
•CSTaNC-08 10 Mix OS-9 6HK. . 



32 bit tegi^Jfir 
Lrteger Long 
.18.0. ..9.0 

..9.8. ..€.3 



{ 



C ay**neric ^op 



r bit I; 7 

register long t 

for (bO; I < 999999; ++Q; 



avaiable to the user is requred and reserved for the system. 

A RAM disk of 480K can be easiy configured, leawig 288K 
free for proojam&ysJem RAM space. The RAM DISK can be 
configured to any size your appfcatbn requres (system must 
have 128K in addition to Is other requramerits). Leaving the 
remainder of the original 768K lor program use. Sufficient 
source \ndified (drivers, etx) 

Data-Comp Division 

A Decade of Quality Service" 




Systems World-Wide 

Computer Publishing, Inc. 5900 Cassandra Smith Road 
Telephone 615642-4601 ■ Telex 510 60O&3O Hixson Tn 37343 

S ■ 

* Thcae \*flh SWPC ti<iertty Fl£X 5* - Col for specU info. 
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The C Programmers 
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Always Right On Target! 

C User Notes 



A Tutorial Series 



By: Dr. E. M. 'Bud' Pass 
1454 Latta Lane N.W. 
Conyers, GA 30207 
404 483-1717/4570 

Computer Systems Consultants 



This chapter discusses the C Users' Group 
program library, which has a large number of C 
programs and functions of potential interest to 
many C programmers. It also discusses the 
problems associated with floating-point roundoff, 
providing considerations for controlling errors 
caused by the use of floating-point arithmetic. 

C USERS' GROUP PROGRAM UBRARY 

The C Users' Group supports a public-domain 
library of public-domain software written in the C 
language. There are over 100 volumes of programs 
in this library, currently available for eight dollars 
each to members of the C Users' Group. A catalog 
describing every volume in detail is available for ten 
dollars to members. A newsletter describing recent 
additions is also available. 

Many of the volumes are specific to particular 
environments and would require a significant 
amount of effort to modify them for use in another 
environment, or would be useless on other 
computers or operating systems. This reduces the 
potential usefulness of many of the programs and 
functions on the volumes. 

Another problem with the use of this library 
concerns the disk formats available. They are 
readily available in either 8" SSSD CP/M format for 
CP/M software or 5.25° MSDOS format for most 
other software. They are available in only other 
formats which are writable by members of the 
users' group. None of the standard OS/9, FLEX, 
UNIFLEX, or UNIX formats are in the list of disk 
formats readily available. Of course, the files may 
be copied from an MSDOS or other format disk 
over serial or parallel connections to another 
computer. 

The quality and portability of the volumes in the 
library varies significantly, due to the variation in 
the source and purpose of the programs and due to 
the variation in the stall and experience of the 
developers and maintained. 

Following is a short list of volumes of potential 
interest to 6809 and 680x0 users: 



115 


Ed Ream editor for small C 


126 


Martz C library 


127 


RAP formatter 


12 9 


Citadel bulletin board 


132 


6809 tools 


133 


E screen editor 


137-8 


DDJ columns 


145 


ROFF4 formatter 


146 


Small C for 6800 FLEX 


147 


8BBS4 bulletin board 


149 


6800/1802 assemblers 


155 


B-treeSp FFT, etc. 


160 


Programs from Learning to 




Program in C 


161 


Programs from Efficient C 


165 


Programs from Reliable 




Data Structures in C 


168 


Simple data base 


172-3 


LEX processor 


174-5 


YACC processor 


176 


XL1SP processor 


182 


UNIX bulletin board 


185 


Sort utilities 


190 


68k assembler 



197-8 MicroEMACS screen editor 

Microware is marketing the MicroEMACS 
screen editor for OS-9/68K, so converting the 
public domain version to OS-9/68K is probably not 
worth the effort. 

The C Users 1 Group may be contacted at the 
following address: 

C Users' Group 

Box 97 

McPherson % KS 67460 

or at the following telephone number: 

316-241-1065 

ROUNDOFF ERRORS 

Numerical results on digital computers may be 
incorrect due to errors of multiple types, derived 
from several sources. The categories of error 
sources are those inherent in the mathematical 
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modelling of the real-world problem, those caused 
by radix and other conversions, those induced by 
modelling of the real-world problem, those caused 
by radix and other conversions, those induced by 
the truncated representation of numbers during 
computations, and those caused by errors in the 
statement of the desired computational sequence. 

Numbers are usually represented in digital 
computers in one or more of several formats, 
designated in C as char, int, long, float, and 
double. Each of these formats has limitations on the 
space allocated for the representation of the 
numbers under their classifications, which must be 
considered by a user of these computers. 
Mainframe computers usually have special 
hardware to process each of these types of numbers 
in order to materially increase the processing speed. 
Mini and micro computers usually process several 
of the types with software. 

Integer numbers have representations which are 
whole numbers, and may usually take on both 
positive and negative values, although not always. 
Since they have a limited amount of storage 
assigned to them, they always have restrictions on 
their values. Depending upon the internal 
representation of the numbers, these restrictions are 
usually stated as a number of decimal digits or as a 
number of binary digits (bits). 

Floating-point numbers contain a real number 
and an exponent. Both the real number, often called 
the characteristic, and the exponent, often called the 
mantissa, are always signed numbers. The 
exponent value may represent a power of two, 
four, eight, ten, or other base, depending upon the 
implementation. 

The difference between an actual value and a 
true value is called the error. The magnitude of the 
error is called the absolute error. The quotient of the 
error divided by the true value is called the relative 
error. 

Rounding a number is the process of 
establishing an approximation to a true value which 
may be represented in a specified number of digits. 
The difference between the true value and the 
rounded approximate value is called the roundoff 
error. 

The number of significant digits is usually based 
upon the largest power of ten which may be 
represented exactly, given the number of decimal 
digits or bits allocated to each data type, ignoring 
scaling factors. This number is normally trivial to 
determine if the data type is represented in decimal 
and reasonably simple to determine if the data type 
is represented in binary. For example, a 16-bit 
signed binary field can contain a range of numbers 
from -32767 to +32768, and thus has 4 digits of 
precision, A 32-bit signed binary field can contain 
a range of numbers from negative to positive two 



billion (approximately), and thus has 10 digits of 
precision. In making the determination of the 
number of significant digits for floating point 
representations, the exponent is ignored. 

The first source of errors is that caused by 
simplifications and inaccuracies in the modelling of 
the real-world system. For example, Newtonian 
physics provides an excellent mathematical model 
for the description of the movement of physical 
bodies moving at "normal" relative spteds in 
frictionless environments. The modelling becomes 
less accurate for those systems involving friction 
and/or those systems involving extremely high 
speeds. 

The modelling of physical systems is not the 
only case in which errors are made due to 
simplification of the real-world systems. Given the 
same set of historical and current data, different 
econometric models would ptedict different results 
of the same governmental policy or business 
marketing change. Given the same personal or 
business system, different tax preparation systems 
would compute different amounts of money to be 
paid or refunded. These differences are primarily 
due to the variations in the world-views of the 
various models, not necessarily to mistakes in the 
models, mirroring the world-views of the model 
designers. 

The most subtle problems caused by 
simplification in modelling are those implicitly 
stated in the assumptions under which the model 
was derived. Most assumptions are stated 
positively, if at all, leading to the potential problem 
of the utilization of models in situations in which 
they are not really applicable, because of the lack of 
negatively-stated assumptions. 

When evaluating mathematical models on digital 
computers, an additional level of modelling is 
required. Mathematical functions such as 
integration which involve an infinite number of 
sums or other operations may not be performed 
directly, but must be approximated by a finite 
number of discrete operations. 

Unless extraordinary care is taken during the 
construction of programs few the evaluation of such 
functions, the results will be inaccurate. Close does 
not always count, especially when a large number 
of small structural errors is present 

Conversion problems may occur during the 
decimal/binary and binary/decimal transformations 
usually required to allow computers to 
communicate with humans, other computers, and 
with other devices. Some computer hardware and 
software systems avoid the radix conversion 
problems by performing all or some internal 
operation in decimal, rather than in binary, and 
some of the comments below obviously do not 
apply to such systems. Decimal operations are 
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generally slower than binary operations, and are 
wasteful of memory in many cases. Thus hardware 
and software designers tend to emphasize binary 
data storage and to de-emphasize decimal storage, 
in general. 

Although integral decimal numbers may be 
easily converted exactly to binary, and vice versa 
(assuming no overflow), non-integral decimal 
numbers may have repeating binary equivalents 
(and vice versa), and thus no finite number of 
decimal or binary digits is always sufficient to 
exactly contain a non-integral binary or decimal 
number. 

An additional problem concerns the uncertainty 
of the last decimal digit or last four bits during the 
conversion from binary to decimal or from decimal 
to binary, assuming a finite number of digits of 
precision. Since one decimal digit requires more 
than three and less than four (3 and 1/3) bits to 
represent, convening a non-integral binary number 
to decimal and back will, in general, cause at least 
the last four bits to different, although cases may be 
generated in which no bits would be different or in 
which almost all bits would be different, due to 
roundoff, which is discussed later in this article. 

Although radix conversion errors cannot be 
entirely avoided, they can be controlled. For 
example, if one program produces results for 
another program to use, it would be advantageous 
for no radix conversions at all to be required, thus 
eliminating it as a source of error. Most computer 
languages provide means for specifying binary 
input/output formats, as opposed to decimal 
input/output formats. Even those that do not allow 
binary input/output often support a scientific 
notation which maintains the maximum number of 
digits of precision, regardless of the size of the 
number, thus minimizing the conversion error. 

Rounding errors are caused by the 
representation of a value by an approximation 
which will fit within a limited amount of precision. 
There are several methods used to perform this 
process. The oldest method, simply truncates the 
excess digits or excess precision; this produces 
results with absolute value consistently smaller than 
the absolute true value. Another method adds + or 
- decimal 5 (or binary 01) to the first insignificant 
decimal digit or bit, depending on the sign of the 
number, thus rounding the nearest least significant 
digit, and possibly the entire number. Still another 
method rounds such that the last digit is even. 
These methods produce random roundoffs intended 
to minimize the average amount of roundoff error. 
Although pathological cases may be shown for all 
roundoff methods, rounding to the nearest last 
significant digit is generally used and usually works 
well. 

Why is control of roundoff error so important? 
At first glance, it would stem that roundoff errors 



would be so insignificant that they would seldom 
materially affect calculations. However, more 
careful analysis shows that roundoff errors may 
potentially affect every operation in a lengthy 
calculation. 

The most obvious source, and used as examples 
in most texts, is the roundoff error during 
multiplication. In general, if an n-digit number is 
multiplied by an nvdigit number, the result has 
n+m digits. When this number is required to fit into 
fewer than n+m digits, roundoff errors may appear. 

Roundoff errors may also occur during addition 
and subtraction, since the sum or difference of two 
n-digit numbers requires n+1 digits, in general, and 
during the scaling of smaller numbers participating 
in addition and subtraction operations with larger 
numbers. 

Since division involves multiplication, addition, 
and subtraction, roundoff errors may be greatly 
magnified, especially when dividing a larger 
number by a number smaller than one in 
magnitude. 

Because transcendental, logarithmic, and other 
mathematical functions are usually evaluated by 
Taylor or other series expansions, roundoff errors 
must be carefully controlled at every stage of a 
calculation to prevent them from destroying the 
significance of the results. 

What can be done by a programmer to minimize 
the results of roundoff errors in calculations? 
Although there are no global solutions, there are 
good sets of guidelines to be followed. 

Structure calculations to eliminate the use of 
floating-point operations entirely, if possible. 
Thus, if a program performs calculations involving 
dollars and cents, use long (often 32-bit) data 
types, convert dollars to 100 * cents on input, and 
convert cents to dollars and cents on output. The 
only remaining rounding errors may involve such 
tax or other calculations which then result in an 
integer number of cents. 

Order calculations to attempt to perform 
operations on like-size numbers. For instance, 
perform the following computation with ten decimal 
digit floating-point accuracy: 



1.0000000000 
♦1.0000000000* (10 to 
-1.0000000000 



-15 power) 



0.0000000000 



Although every number entering the calculation 
is exact, the result is at least slightly surprising; 
however, if the calculation were ordered correctly, 
the following results would be more as expected: 
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1.0000000000 

-1.0000000000 

+ 1.0000000000M10 to -15 power) 



+1. 0000000000* <10 to -15 power) 



If specific truncation is necessary, such as in the 
case of tax or other monetary calculations to the 
nearest penny or dollar, perform it as early as 
possible in the operational sequence. This will 
minimize the common error in which the sum of the 
columns of a matrix disagrees significantly with the 
sum of the rows. Such problems are not only 
embarrassing; they may violate audit and 
governmental regulations requiring crossfoot errors 
to be less than one dollar. 

Never use direct equality tests involving 
floating-point numbers. Instead, use group tests, 
such as "greater than or equal to" or "less than or 
equal to", or interval tests, such as 
"abs(expression) less than" or "abs(expression) 
greater than", etc. Avoid any use of non-integral 

loop counters, since such structures often loop one 
too few or one too many times, because of 
roundoff error. 

Although there is no totally effective means of 
eliminating programming or design errors, there are 
means to detect errors and to hopefully conect them 
without creating new ones, on an iterative basis. 

The most effective time to eliminate errors is in 
the statement of the problem. Given a correct 
statement of a problem, errors can occur at any 
stage of the design, analysis, programming, or 
implementation of a program or of a system. 
Programming texts provide many hints for 
checking the results of programs against standards, 
etc. 

A tool which is so commonly used to help 
prevent programming errors during calculations that 
it is often forgotten is the standard library. Imagine 
the chaos which would result if every calculation 
were written in a low-level language such as 
assembler or machine language, and no common 
libraries were used; programming errors and 
calculation errors would be rampant. Even in 
low-level languages, standard libraries are available 
to perform extended precision and floating-point 
calculations. For example, Motorola offers the 
MC6839 IEEE standard floating-point package to 
assist 6809 users in such calculations in assembler 
language. Many C compilers offer one or two 
floating-point data types (float and double) and a 
library of floating-point routines. 



One danger in using such tools to assist in the 
programming process lies in misunderstanding their 
limitations and strengths* such that the limitations 
may potentially corrupt the calculations being 
performed. 

Following are seveial sample programs intended 
to demonstrate specific points about roundoff error, 
as related to the number of significant digits carried 
by various language implementations. 

The first is a C program designed to show the 
differences a few digits of significance can make in 
extreme cases. C compilers often support two 
lengths of floating point numbers, limited to two 
fixed numbers of bits. The constant is chosen to 
overflow the number of significant digits of the 
shorter floating-point representation, but not the 
longer. Thus the double-precision value is slightly 
greater than one, but the single-precision value is 
equal to one, and one to any power is still one. 

♦include <stdio.h> 



main <) 



int i; 
float a; 
double amt,b,c; 

amt ** 1.00000001; 

a - amt; 

i - 0; 

b - arat - a; 

c - b * 100 / arat; 

printfr *2d %15.7f %12.7f %6.1f\n", 

i, arat, a, c) ; 
for (i « Ij i < 31; ++i> 
{ 

amt ■* arat * amt; 

a - a * a; 

b - amt - a; 

c - b * 100 / amt; 
printf( w %2d %15.7f %12.7f 
%6.ir\n w , 

i t amt, a, c) ; 
) 
exit (0) ; 



The output produced by this program appears 
below. The first column represents the iteration 
number, the second represents the double piecision 
value, the third represents the single precision 
value, and the last represents the percentage of 
relative error. 



1.0000000 
1.0000000 
1.0000000 
1.0000001 



1.0000000 0,0 

1.0000000 0.0 

1,0000000 0.0 

1.0000000 0.0 
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4 


1.0000002 


1.0000000 


0.0 


5 


1.0000003 


1.0000000 


0.0 


6 


1.0000006 


1.0000000 


0.0 


7 


1.0000013 


1.0000000 


0.0 


e 


1.0000026 


1.0000000 


0.0 


9 


1.0000051 


1.0000000 


0.0 


10 


1.0000102 


1.0000000 


0.0 


11 


1.0000205 


1.0000000 


0.0 


12 


1.0000410 


1.0000000 


0.0 


13 


1.0000619 


1.0000000 


0.0 


14 


1.0001639 


1.0000000 


0.0 


15 


1.0003277 


1.0000000 


0.0 


16 


1.0006556 


1.0000000 


0,1 


17 


1.0013116 


1.0000000 


0.1 


18 


1.0026249 


1.0000000 


0.3 


19 


1.0052566 


1.0000000 


0.5 


20 


1.0105409 


1.0000000 


1.0 


21 


1.0211930 


1.0000000 


2.1 


22 


1.0426351 


1.0000000 


4.1 


23 


1.0675050 


1.0000000 


6.0 


24 


1.1626671 


1.0000000 


15.4 


25 


1.3987015 


1.0000000 


26.5 


26 


1.9563659 


1.0000000 


46.9 


27 


3.6273676 


1.0000000 


73.9 


26 


14.6467426 


1.0000000 


93.2 


29 


214.5656666 


1.0000000 


99.5 


30 


46047.0063263 


1.0000000 


100.0 



The following example is a short C program 
designed to illustrate the dangers of using a 
non-integral value for a loop control variable. 
Various language processors produce different 
results when presented with such constructs. 



tinclude <stdio.h> 



mainO 



int j; 
float I; 

for <j - 0; i - 0,999999999; 

i < 9.99999999; 

i ♦- 0.999999999. **j); 
print* < w %d\n w , J>; 

exit(Q); 



The correct answer is 10; however, many C 
programs print 9 or 1 1. 

The final example is intended to demonstrate the 
dangers of ignoring roundoff when using textbook 
solutions. Remember the formula provided in high 
school for determining if the roots of the 
polynomial (a*x*x+b*x4c) are real, equal, or 
imaginary? It compares the value of the expression 
(b*b-4*a*c) for positive, zero, or negative. 
However, for values near zero, the roundoff 



problem becomes crucial, and values of exactly 
zero will not often be encountered, in general. The 
usual solution is to assume that any value larger 
than some very tiny positive number is positive, 
that any value smaller than some very tiny negative 
number is negative, and that numbers falling into 
the intermediate range are zero. However, the 
coefficients a, b, and c of the polynomial could 
themselves each be very small, leading to potential 
problems unless they are scaled first. 

tlnclude <stdio.h> 

main ( ) 
( 

float a,b,c; 

while (1} 
< 

printffa, b, c\n") ; 

sscanf ("%f«f«f , 4a, 4b, 4d; 

if C!a) 

break ; 
d-b*b-4*a*c; 
printfr%f *f *f *f %s\n", 
a. b. c, d, 

<d > 0} ? -positive" ; 
Cd < 0) ? "negative" : 
"zero") ; 
) 
exlt(O); 



The programmer must be aware of the problems 
which may be caused by roundoff and other errors 
encountered during numerical computations. These 
problems are not confined to scientific and process 
control classes of programs, and may affect 
seemingly simple calculations in game or business 
programs. 

They must be particularly wary of the C 
compilers which offer less than the equivalent of 10 
decimal digits of precision when performing 
calculations involving money; some reports 
submitted to governmental organizations must be 
coirect to the penny, and others must be correct to 
the dollar. There may be civil penalties for 
violations of such regulations. 

EXAMPLE C PROGRAM 

Following is this month's example C program; it 
converts assembler equate files to C definitions. 



tloclvd* <»tdio. h> 
♦include <ctyp«.h> 

char *p, *q, *r. •trAnat*St); 
FILE *td - stdln, *td - Btdouc; 
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aaln(argc. argv} 
lnt argcr 
char ■«rgv[); 
( 

if (argc > U 
I 

if Cargvll) — • •-') 
t 

if lirgvinill — '?'l 



( 



f puti CUaaga; ". atdarr); 

f putt (■r<jv[0) . atdarr); 

fputa C (input-flla [output-f lis) J \n\n-. 

atdarrl ; 
fpatW "Whara-, lnput~flla la input flln n*na\n", 

atdarr); 
fputaC ovtput-flla la output flla najw\n\n* 

atdarr) t 
f puta(»rgv[0] , atdarr); 
fputa C convtrtt aaaamblar aquataa to C COdi.VnVn', 

atdarr) ; 
fputa CValuaa ara danotod by: naa«.\n", 

atdarr*; 
fputaCAddraaaaa ara danotad by: pt r (nana) . \n", 

atdarr); 
fputa CSingla bytaa ara danotad by; paak (nana) An*. 

atdarr); 
fput.Cftoubla bytaa ara danotad by: dpaak (nana) . \n*« 

atdarr) t 
fputcCNn 1 . atdarr); 
aait (0)j 



I 
I 
alaa 

i 



If tl Ifd - fopan(argsrtl). m f})} 
t 

fprintf (atdarr. *%a: cannot opan %a\n", 
argw[0|, argvjll); 

aKlt(l); 



I 

if I large > 2) it I! (td - f opan (argv [2) , -»*)))) 

I 

fprintf (atdarr , °«a; cannot opan *a\n*, 
argv[0), argv|2l); 

a*lt(2U 
J 



^ 



whila |fgata(atrinq. 254. fd) ) 
I 

for (p - atrinq; •p; *+p| 

if |» p •• '\f| 

•p - ' '; 
for (p • atrinq; Cp — ' ♦) ; 
twitch Cp) 
( 

cut ' ; ' : 
caaa ■■*: 

putcW. td); 
pctcl # ". td) / 
if ( -+*p »- ► •) 

putc<* S td); 
wt\lla Cp >*> • •) 

putcCp**. td); 
if (' <p - U !- • ') 

putcr '. td); 
putcC"*, td)/ 
putc(«/«. td)/ 
caaa ■ \n': 
caaa '\r': 
caaa * \0* : 



♦♦p); 



putc('\n» # td}; 

continuo; 
} 
if UllaalphaCp)) 4* Cp •- '_•»> 

continuo; 
for (q - p; Cq > • »); ♦♦q) ; 
whila Cq — * •) 

♦ ♦q; 
if CCq !- •-•> ** 

atracaplq, "aqu ", 4) fit 

atmcnp(q 4 •BQu •« 4> ) 

continuo; 
whila Cq > » ►) 

♦♦q; 
whila t*q "« ' ') 

♦♦q; 

if Cq < « ») 
contlnua/ 
fputa Ctdaflna -, td) ; 
whila Cp > * *) 

putccp**. td>; 
putcC ' t td); 
putcC V , td); 
whila (*q > ' ') 
I 

if Cq — »*»1 
I 

putct'O*, tdlr 
putc(<»'* td>; 
♦♦q; 
I 
alaa 

putc('q*»e td},- 
\ 

putc(M'» td)/ 
putc(*\n'. td); 

fputa (-\nllfndaf pa«k\n a . td); 

fputa C'daflna paak (s> ■ ((char *>(a))\nV td>; 

fputa Ctdaflna doaak<*l • ( (lnt *H«H\n*. td> ; 

fputa Ctdaflna ptrU) I (char a )(*H\n a . td>; 

fputa CtandifNn*, td)/ 

if {fd !- atdln) 

fcioaa(fd); 
if (td 1- atdout) 

fcloaaltd); 
a*lt (0); 



TOW 



FOR THOSE WHO\ 

I 



lo k\o\\ 
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MACROS ANYONE? 



The word MACRO is Greek In origin. It 
means large. If you looked It up in the 
dictionary, it would tell you something like: a 
prefix meaning large, long, great or excessive. 
Macro is also a part of computer Jargon. It 
also prefixes a word. The moie formal name 
is MACROINSTRUCITON. If you can create a 
group of instructions and execute them with 
one Instruction, then you have created a 
macroinstructlon. Or macro for short. 

Sometime back I wrote a column on the OS- 
9 procedure. It Is a file that contains lines of 
OS-9 Instructions. They can be executed by the 
shell. Or they may Invoke another procedure 
file or program. A prime example is the 
STARTUP nie. Usually it contains SETIME 
and other things that you may want to have 
occur at start up time. You don't need to type 
all those lines. Just enter the file's name. 

A more basic form of the macro occuis at 
the computer architecture level. At the gut 
level of the microprocessor are sets of 
Instructions. These are even more primitive 
than the ones found in writing assembly 
language programs. One mlcro-P that I 
studied had only 16 instructions. And two of 
them were No Operations (NOP)code. From 
these the standard set of computer op codes are 
created. It is easiest to examine one of these. 
Let us say we write the following in our 
assembly language program: 

ADDA $25 

The sequence of code to effect this would be: 



IR <— M[PC], 
TR < — M(PC), 
A < — A 4 TR 



PC <— PC+1 

PC < — PC+1 



The IR Is the Instruction Register. M is 
memory location. PC is the program counter. 
And TR a temporary register. This sequence 
says to move the contents of memory location 
pointed to by the PIDgram Counter into the 

Instruction Register. The Program counter is 
Incremented by one. The next memory 
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contents, the $25. Is moved to the Temporary 
Register. Again the program counter is 
Incremented. Finally, the two registers are 
added and stored in Register A. This all occurs 
in a few machine cycles. But the programmer 
does not have to wony about the Instructions 
above, he uses the macro ADDA and 
eveiythlng is done automatically. 

This Is a simple, basic example of the 
macro. Eveiythlng is relative. It turns out the 
sequence of events are really called 
microinstructions. The op code is simply an 
instruction. But it really is a macro that 
causes a number of cycles to occur Inside of 
that little black chip called the CPU. 

MACRO ASSEMBLERS 

At the assembly language level Is the macro 
assembler. This is an assembler that permits 
us to create macros while working in 
assembly language. Mlcroware has a rather 
nice one called the Relocating Macro 
Assembler. This Is the same one provided 
wllh their C language compiler, with It you 
can create instruction sets that can be called 
with a psuedo opcode. 

Let us say periodically you want to clear the 
D register In the 6809. There Is no one code for 
It. But you could create the following: 

CLRD MACRO 

12 
CLRA 
CLR8 
ENDM 

Now, anytime you wanted D to be cleared 
Just use CLRD. At assembly, the CLRA and 
CLRB will be substituted for the psuedo opcode. 

There are three parts to creating this 
macro. First Is the header. This is its name 
with MACRO alter it. Next is the body of the 
macro. Finally, it is ended with the 
terminator. ENDM indicates the macro end. 
Arguments can be passed to the macro, too. 
These are indicated with the back slash and a 
number. Then can be \1 through \9. Here is a 
simple macro: 
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PRINT MACRO 

11 
LEAX \1,PCR 
LDA #\2 
LDY #\3 
OS9 I3WRITE 
ENDM 



GET ADDRESS OF STRING 
GET OUTPUT PATH 
GET STRING LENGTH 
WRITE IT! 



Anytime we want to print something. Just 
enter: 

PRINT STRING, $01, LENGTH 

At assembly time this one line will become: 

LEAX STRING, PCR 
LDA #$01 
LDY # LENGTH 
OS9 I$WRITE 

One simple line of code becomes 4 program 
lines. Every time the PRINT macro is used 4 
lines are generated for it. 

There is some confusion between a 
subroutine and a macro. Hopefully, this can 
help to settle it. It is easy to see a parallel 
between the two. Both receive parameters and 
both accomplish some function. The big 
difference is that one is a separate routine, 
while the other is a templet for a function. 
When the macro is used, the lines of 
instruction are generated in the program. 
Each time the macro is called, it generates the 
same lines of code. On the other hand, the 
subroutine is an actual routine that is entered. 
It can be entered from anywhere with the 
return addiess pushed on the stack At its end. 
a RTS puts the return address back in the 
Program Counter and execution continues 
from the calling routine. So the subroutine 
exists in one location. It is entered and exited. 
The macro recreates the same routine eveiy 
time it is called. The subroutine is created 
only once. 

With regards to this, care must be taken 
when creating labels with the the macro. 
Remember each time the macro is called, it 
gets "rubber stamped". If this is done more 
than once and tt has some internal labels, 
there will be multiply defined labels. To 
overcome this dilemma, the RMA permits you 
to cieate unique labels for each created macro. 
A label is specified with: 



\e? 



At 



The question mark is what you add. 
compile time the label is expanded to: 

Gxxx? 

where the three x's become a unique number 
from 000 to 999. Say you declared the label In 
your macro as: 

\0ABC 

The macro would generate ©O0QABC for the 
first time. ©00 1 ABC the second time and so 
on. This gives you about 1000 tiroes that the 
macro could be called. 



Two other handy Items are: 
\Ln and \# 

The first one returns the character length of 
the n argument. The second returns the 
number of arguments passed. In the example 
given before using the macro PRINT, it might 
be advantages to know if 3 arguments are 
passed. At compile time, we want to know if an 
error has occurred in specifying the macro 
PRINT. After the first line we can add: 

ifne \#-3 

FAIL PRINT: Must nave three arguments 

endc 

Now should we try to compile the source 
code and declare the incorrect number of 
parameters, the error counter will be 
Incremented and our fall message displayed. 
The \Ln works in much the same way. It can 
check for incorrect argument lengths. 

EDIT MACROS 

Many word processors and editors allow 
macros to be created. A writer friend reports 
of a word processor that permits defining 
some keys to generate groups of characters. 
Ideally the writer encodes certain frequently 
used words into the macro key table. They 
may include names, often used phiases, and 
whatever else suits the writer's imagination. 
Then Instead of typing out the word, the 
proper key is pressed. Poof! The word appears 
almost instantly. 

The standard OS-9 Editor has a facility to 
make macros. Macro commands can be made 
that combine edit commands. Complex edit 
sequences can be accomplished with a single 
line entiy. Newly created macros can be saved 
to disk. And older ones can be reloaded. The 
macro consists of two parts. There is a header 
which contains the macro name and a 
variable list. And there is the body of the 
macro. This contains the edit commands that 
produce the desired results. 

The header name can be of any size, 
although a short name is probably more 
desirable than a long one. After all. the macro 
is used to save work, and who wants to enter 
long names? The name is not sensitive to 
case. So either upper or lower case can be used. 
The name is followed by the parameter list. 
Two types of arguments are peimltted. They 
are string and numeiic. If a variable name is 
preceded by a #, then it is numeric. If a $ is 
there, then it is string. By way of example, 
let's say the (list line of the macro is: 

FIND #N $STRING 

When this macro is called from the editor, 
it could be entered as: 
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E: .FIND 12 "Hello" 

The dot before the macro name Indicates 
that FIND is indeed a macro. In the call to this 
macro. #N would be equal to 12 and $STR1NG 
would be "Hello". Parameters must be passed 
in proper order. Once in the main body of the 
macro, they are referenced by their variable 
name. Just as a program would do. 

As said earlier, the main body of the macro 
consists of commands that could have been 
entered In response to the editor prompt. Any 
series of commands, entered while in an 
editor session, can be part of a macro. There 
are some items that appear more often in a 
macro. First, there Is the brackets and 
semicolon. There syntax Is: 

[ ... ] n 

What appears in the bracket is executed for 
n times. If something fails within the 
brackets, they will be exited prematurely, 
before n counts have occurred. If a colon Is 
added into the loop a conditional exists. Its 
syntax appears: 



[ 



J n 



As long as the editors Internal fall flag Is 
clear, everything in front of the colon will 
execute. As soon as an operation causes it to 
be set. execution goes to the statements alter 
the semicolon. 

The best way to undei stand a macro is to 
create one and examine it. To start a macro we 
can enter: 

E: .MAC // 

This says to edit a macro that Is new. If a 
name were placed between the delimiters that 
particular macro would be edited, as long as it 
existed. Now we can create a macro that finds 
the Nth occurrence of a string and deletes the 
line it is in. So we enter the following 



M: 


DELLINE 


$s 






M: 


! THIS 


MACRO 


DELETES ALL LINES 


M: 


! THAT 


HAVE 


$s 


IN IT. 


M: 


" 






! MOVE TO FIRST LINE 


M: 


[ 






r loop l 


M: 


.NEOB 






r TEST FOR END OF BUFFER 


M: 


I 






I LOOP 2 


M: 


-STR $S 


D 




i DELETE IF $S IS PRESENT 


M: 


: 






! EI£E 


M: 


4- 






r ADVANCE TO NEXT LINE 


M: 


3 






I END OP LOOP 2 


M: 


1 * 






] END OF LOOP 1 


M: 









I QUIT 



commands can be used while entering a 
macro. The working of this macro is simple. 
On entry $S is the target string. We move to 
the start of the buffer. Loop 1 test for the end 
of buffer wtth .NEOB. As long as this is true { 
the fall flag is clear ). the contents of loop 1 are 
executed. Loop 2 tests for the presence of $S on 
the current line. .STR clears the fall Hag if the 
string is found, otherwise it is set. As long as 
the line has $S in it, it is deleted. Now, if $S is 
not found the fall flag is set and execution 
occurs after the colon. This merely advances 
to the next line. In short, this macro test a 
line for a strtng. Delete it if present, else 
advance to the next line and try again. 

This is a trivial case. It may not be very 
practical or useful, unless you are trying to 
puige a file of some unwanted record. You can 
create more complicated and useful ones, then 
1 have shown here. When you have something 
worthwhile saving Just enter: 

.SAVE "MACROl MAdU^MYMACROS" 

Here two macros are saved to a file called 
MYMACROS. Later when entering a new edit 
session, enter: 

.LOAD "MYMACROS w 

and they are back in the macro area of the 
editor. You can also enter: 

.DIR 

and you will see a listing of the buffers and 
macros that you have. 

There is a very useful set of commands that 
set the fail Hag if the condition is not true. 
These give you the means to execute loops and 
comxnands.They are in brief: 



EOF 




at end of file 


NEOF 




not at end of file 


EOB 




at end of buffer 


NEOB 




not at end of buffer 


EOL 




at end of line 


NEOL 




not end of line 


2ERO 


n 


is n zero 


STAR 


n 


is n 65535 <*) 


STR str 


is str in line 


NSTR 


str 


is str not in line 


S 




exit loop and clear flag 


F 




exit loop and set flag 



Lines that are part of the macro are 
Indented one space, just like it is done while 
using the editor. Most of the standard edit 



if you do a lot of work with the OS-9 editor, 
you'll definitely want to make use of macros. 
The offer a way to do complex repetitive tasks 
quickly and easily. 

MACROS IN C LANGUAGE AND AN ANSWER 
TOAPUZLE 

C language has its version of the macro. It 
is called the macro substitution. If you have 
done any programming in C, you will quickly 
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recognize the preprocessor command fldeflne. 
They are usually at the start of the program 
and take a form something like: 

♦define CLEAR 12 

This tells the compiler to substitute 12 for 
CLEAR in the source code prior to compiling. 

A macro can also be defined with 
arguments. A simple statement can be created 
that will be replaced with another that has 
been previously defined. Let's look at an 
example. 

♦define cube(x) (x*x*x) 

Now later when the program is executing, 
we enter a line: 

y- cube (a) 

But during the preprocessor phase the line 
becomes rewritten: 

y-(3*3*3) 

Notice that the variable used is different 
from what is declared in the ^define 
statement. In fact, nothing has been said 
about the variable type. The substitution 
occurs. Whether it can be compiled is up to 
you. 

Say you have a function called swap. It 
takes two Integers and swaps them, litis 
function could be written: 

1 /* Swap two integers */ 

2 int awap(i, j) 

3 int *i, *j; 

4 ( 

5 int t; 

6 t-*i; 

1 *i-*j; 

8 *j~t; 

9 I 

This could be ieplaced with the following. 

1 *define swap(i,j) t-i; \ 

2 i-j; \ 

3 j-t; 

4 int t; /* temporary storage */ 

They will both do the same thing. What is 
the difference? lite first is a function. It Is a 
separate routine. Each time it is called, the 
aiguments' address pointers are pushed on the 
stack. Using their pointer values in swapQ. 
they are swapped around using t as a 
temporary location. The second method is a 
macro substitution. Each time a swap occurs 
the token is replaced by the program lines. No 
calls are made to outside routines. And 
pointers don't have to be used. By the way, 
those reverse slashes indicate continuation of 



the code on the next line. If you use the 
Mtcroware C Compiler, than you would have 
to put the code on the same line. So the line 
would appear: 

♦define swap (a, b) t-i; i-j; j-t; 

Either way though the result will be the 
same. 

Occasionally code does not turn out as you 
may have Intended. Last month I left you with 
a programming mystery. I use a C define 
macro that worked fine, but ended in 
generating a longer object Ale. The executable 
module was longer then it needed to be. I had 
attempted to write a macro that would print 
out strings. It was: 

ffdefine OUT 1 

•define print is) write(OUT. s, strlen {s)> 

Using it would make things much easier. 
To wiite out the string "HELLO", all I needed to 
type was: 

print ("HELLO") 

Pretty easy, oh? Well it did what It was 
suppose to do. But during the precompiler pass 
the line would be changed to: 

wrlted, w HELLO w , strlen ("HELLO") ) 

What do you think the assembly code looks 
like after the C compiler has converted it? 
Here is my annotated version of it: 

■ ■ print <" HELLO"); 

* Get the string length of -HELLO" 

* and save it on the stack 
leax _2.pcr 

pshs x 
lbsr strlen 
leas 2,s 
pshs d 

* Save the location of "HELI0" 
leax _l,pcr 

pshs x 

* Save the standard output path 
ldd #1 

pshs d 

* Branch to WRITE 
lbsr write 

leas 6. s 

* Printed string "HELI0" 
_1 

fee "HELLO" 
feb $0 

* String checked for length 
_2 

fee "HELLO" 
feb §0 

The string length of "HELLO" is first 
checked with strlcnO. The result is returned 
and saved on the stack. Next the location of 
"HELLO 1 * is pushed on the stack. Notice that it 
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is not the same "HELLO", whose string length 
was checked. Finally, the standard output 
path is pushed and a long branch is made to 
the library routine WRITE. 

The Important thing here Is that our string 
gets repeated twice. C has no way of knowing 
that it Is the same. As far as It is concerned, 
the strings are two different entitles. Now 
take this effect and reproduce It over and over 
again, and you've got a program that Is much 
longer then It should be. Every printed text 
line gets repeated twice In the executable file. 
So what do we do? 

First, we could correct the assembly code 
created by the C compiler. This would mean 
going through the entire assembly code. All 
double entries would have to be erased and 
references to them adjusted properly. In the 
previous example, the label J2 and the two 
lines after 11 would be erased. Then, the 
references to J2 would be changed to .1. This 
would need to be done for each occurrence. 
Last months program contained many needed 
corrections. The Job could become a little 
tedious and possibly prone to mistakes. So. it 
might be advisable to find another solution. 

Another way to correct the problem Is to 
assign the string to some pointer. Say we 
declared a pointer with "char *t'\ Then every 
time we wanted to print something we would 
set t to point to It. Our previous example would 
be rewritten: 

t * "HELLO" ; 
print (t) ; 

This method Is not really very clean and 
neat. It also defeats the entire purpose of 
having the macro. We are trying to eliminate 
work. Mot create it? And we are trying to make 
a simple, but better string print routine. 

Finally, we may have to look Into changing 
prlntO from a macro to a function. This may 
be the best solution. It does not require 
rewriting the assembly code. It means no 
extra program rewrite. And It is the simplest 
method to correct the problem. So. I deleted 
the macro line. And added the following 
function. 

1 print (a) 

2 char *a; 

3 | 

4 write (OUT, s, atrlen (a) ) ; 

5 | 



Remember the difference between macro 
and subroutines! This becomes a totally 
separate part of the program. The pointer to 
the string Is passed to It. In a sense ihls Is the 

FOR THOSE WHO 

I 



solution I outlined second. A pointer Is used 
as the argument Instead of the string. But we 
only had to add this simple 5 lines to the 
program. Mo major changes were made. 

A FEW CLOSING THOUGHTS 

The idea of replacing a list of instructions 
with a one line input is common to many 
systems. In some cases complex instructions 
are replaced wilh a few keystrokes. The whole 
idea is to make life easier. Afler all who wants 
to do any more work than is necessary? If you 
are into assembly language programming 
you'll find assembly macros save retyping 
repetitive routines. The same is true for C 
macros. If you use the editor frequently, I am 
sure creating macros will save time and speed 
up programming. And if you're like me. you'll 
create procedure files to cany out long 
repetitive Jobs. 

I like to consider what future advancements 
could be made. Some years back I had a 
program that allowed macro * keys to be 
defined. This was before my days with OS-9. 
The number keys when pressed with the 
control key could be defined to print out 
commonly used commands. Holding down the 
control key with a number caused an entire 
command to appear. Maybe a new OS-9 shell 
could be created that permitted such a thing. 
Imagine a A 1 and the current directory would 
appear. Perhaps a A 2 and the date and time 
would be there. The list could go on. 

As I pointed out before. I like to think of 
procedure files as macro lists. Type the files 
name and everything in It executes Just as if 
you entered it from the keyboard. How about a 
procedure oriented language? Create 
procedure files that can handle conditional 
statements, parse the input line for 
parameters and allow simple variables to be 
created. You'll have procedures that don't Just 
execute a list of commands, but can be flexible 
and make decisions during execution. 

How about a pre-processor for BASIC09? 
Write a program with Baslc09 macros. Run 
the pre-processor on it and convert the macros 
to real Baslc09 statements. This would sure 
cut down writing little routines to handle 
simple items. And it would reduce the clutter 
in the directory. 

These are a few thoughts of mine. There is 
so much that can be done. But. even if you not 
the inventive type, use what is available. They 
can make things so much easier. Above all. 
have fun! 



EOF 



/() KXOU 



68 MICRO 
JOURNAL 



J 



18 



June '87 



'68* Micro Journal 



T er minal Wrist 



SOFTWARE 




By: 



A Tutorial Series 

Ronald W. Anderson 
3540 Sturbridge Court 
Ann Arbor, MI 48105 



USER 



From Basic Assembler to HLL's 



You've heard of Tennis Elbow? I have a 
new ailment that I call Terminal Wrist. Is any- 
one else out there nuts enough to sit at a termi- 
nal all day at work and then go home and do the 
same thing? Years ago, I stopped holding my 
hands poised above the keys as I used to do with 
a manual typewriter, and yielded to the sloppy 
programmer practice of resting the heel of my 
hand on the front edge of the keyboard while 
typing. If the terminal is on a table just at the 
proper distance, my wrtsts end up laying right 
on the edge of the table. However, my palms al- 
ways lay on the edge of something and support 
the weight of my arms. When I really get in- 
volved the heels of my hands get sore and stay 
that way until I take a day or two away from the 
terminal. 

I had an additional irritation on one of 
my terminals. It seems the whole thing was 
made with a very rough textured finish, though 
it is molded plastic. It felt like resting my 
hands on sandpaper! I fixed it by using some 
very fine sandpaper to take the roughness away. 
The improvement is most welcome. I suspect 
we all tend to work with the terminal too high 
or our chair too low. You really shouldn't be 
reaching up for the keyboard, and that is proba- 
bly at least part of the cause of the discomfort. 
Anyone have any good ideas? I've lately been 
thinking about a piece of carpeting under the 
keyboard and extending over the table edge. 



NOTES 



PLuS Again 

For (hose of you who are new to (his pub- 
lication and to computing, PLuS is a com- 
puter language very much like Pascal only 
better for some applications, particularly 
those leading to operation of the program 
from ROM in a dedicated computer appli- 
cation such as a machine control or elec- 
tronic measuring instrument. PLuS comes 
from a language written for the 6809 sev- 
eral years ago by Graham Trott in England 
for Windrush Micro Systems Ltd. PLuS 
offers several advantages, particularly to 
those who have programmed in PL/9. The 
new compiler is very similar to PL/9 so that 
program "translation" is almost trivial. It is 
an "interactive 1 ' compiler in that during 
compilation, an error will stop compilation 
and allow you to re-enter the edit mode and 
fix the error. Then you can restart the com- 
pilation. 
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"interactive*' compiler in that during compila- 
tion, an error will stop compilation and allow 
you to re-enter the edit mode and Ox the error. 
Then you can restart the compilation. 

I've heard from Windrush again just re- 
cently, with a newer version of PLuS than I had 
a month ago to begin testing. I managed to get a 
non-trivial program to run on the Mustang, and 
the standard speed improvement factor of 7 
over a 2 MHz 6809 was duels noted. The PL/9 
version is 5577 bytes and the PLuS version is 
6862 bytes. When you consider that the average 
instruction for the 68000 is considerably longer 
than the average instruction for the 6809. the 
small Increase in size is impressive. The speed 
is certainly Impressive, as is the speed of the 
PLuS compiler running on the 68020. Windrush 
is to be complimented on a couple of little im- 
provements over the 6809 version. First of all, 
comments may now be nested. That means that 
one can comment out a whole section of pro- 
gram without getting into trouble for having 
commented out some comments, a real bother 
in the 6809 version. 

I shipped off a bug report via internation- 
al express mall and an update arrived Just 1 1 
days later by the same mall service. I've tested it 
and found that the bugs I had reported were 
completely eliminated, though a few more have 
been found, but they are Just about in the trivial 
category, for example, the compiler doesn't re- 
port an error in the last line of the program! 

I thought I would port over my FFT pro- 
gram that was in last August Micro Journal and 
found that in the process of getting it to run un- 
der PLuS, another bug came to the surface. It 
was hard to pin down, but easy to program 
around once found. Another bug report Is off to 
Windrush. At that point, I converted several 
more PL/9 programs to PLuS and uncovered no 
more bugs, so I think they are rapidly getting 
down to the point of having a very good compil- 



I noted as 1 went through the programs 
that there are a couple more differences between 
it and PL/9 than 1 had first noticed. First of all. 
there is no built-in square root function. I cod- 
ed one In PLuS and added it to the scipack.lib. I 
found after some optimization that I could get 
10000 square roots in 4.64 seconds, or 464 mi- 
croseconds per square root, and that was in a 
loop in which the loop indexing surely took a 
non negligible part of that time. The same test 
program using the built-in square root function 
of PL/9 on a 2 MHz 6809 system took how many 
times longo? You guessed it, the 6809 did 10000 
square roots in 30 seconds, about 6.5 times 
longer! 



Another new feature is some added flexi- 
bility in the case statement. PLuS allows multi- 
ple cases to cause the same action, and It even 
allows groups of cases more or less like the IN 
statement of Pascal. 



r 
i 



if char 

case 'a, 'c then do-sam^thing; I 
case 'A-*Z then uppercase = true; 
I case 'A-'Z, 'a-'z then alfa = true; ' 
I case '1-9 then numeric = true; | 
case 0-31 then control ■ tiue; 

L I 

The PL/9 editor is a line oriented one, and 
I've always thought it to be quite handy, being 
much like the old TSC EDIT. The PLuS editor is 
screen oriented and the control keys are com- 
pletely configurable by the user via the SET- 
PLUS utility. It allows you to move the cursor 
In any direction, goto a line (by number) find a 
string, replace a string Instance by instance or 
globally, and overall is VERY handy. When 
done edliing. you Invoke the compiler. If the 
compiler detects an error you can hit return and 
find yourself back in the editor with the cursor 
right at the error in the source file. Mighty 
handy for quick fixes of syntax errors in the 
program. There is a compile only option in 
which you do nothing but check to see that there 
are no compile errors. You can compile to an 
output file with a listing to the terminal, and 
many other options. 

I had written a couple of simple utilities 
in 'C for the Mustang. One was to initialize the 
Televideo terminal (to get rid of the stupid stat- 
us line at the bottom of the screen and set the 
cursor to non blinking). The other was to cause 
my printer to page (Just send it a formfeed). In 
1 C these were both about 2250 bytes of object 
code. I wrote them in PLuS, and found that I 
could do them in about 250 bytes each. I am not 
saying that PLuS is ten times more efficient at 
generating output code than "C'\ but because the 
library flies are included at the source level* the 
user can eliminate all the unused parts of the li- 
brary and really trim the program down. For 
example, in the case of the terminal initializa- 
tion, all I needed from IOSUBS.LIB was the 
PUTCHAR procedure, and that called the 
Lwrite procedure in the OS9.LIB file. I simply 
edited both libraries into my program (rather 
than using the Include function) and deleted all 
the things I didn't need. The PAGE utility need- 
ed the open and close file procedures as well in 
order to open the path to the printer and output 
the formfeed to it. I guess what I am really say- 
ing is that the user has a little more control over 
his program with PLuS, of course at the expense 
of having to spend a little time optimizing the 
program. 
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At this point, with 20 Mbyte hard disks 
and 2 Mbyte memories, surely someone will 
write and ask what deference it makes if a 
dumb utility program occupies 200 bytes or 2K. 
At the other end of the spectrum someone will 
write and say that my simple utility can be done 
in 60 bytes of 68000 assembler code. 



Of course I expect to keep you updated on 
this compiler as it progresses. Let me just say 
that forme, at least, it will help ease the transi- 
tion to the 68XXX processors in my work and 
my hobby activities. 

HELP 

I have had reports of a bug in PAT in mov- 
ing a block of text within a file. Though I ha- 
ven't had the problem personally, even my co- 
worker who uses the same computer as I, has re- 
ported it to me. Apparently the wrong area of 
memoiy gets moved sometimes. If any of the 
PAT users who read this can tell me how to 
make it happen consistently, I think I can cure 
it quickly. I have known about this problem for 
a long time and have thought that I had cured it 
several times. I think It was introduced when I 
did some cleanup of what happens at the end of 
a text Hie. There is also another bug that occurs 
sometimes when a file is saved. Several blank 
lines are saved at the end of the file. I've had 
that happen to me several times but I can't seem 
to catch what causes it. I have tried leaving the 
cursor several lines below the end of the file on 
exit, but that doesn't seem to do it. 

If any of you know how to cause either one 
of these problems to occur, and can give me the 
sequence of actions leading up to their occur- 
rence, I'd really appreciate the information. 

MORE ON STANDARDIZATION 

I Just received Terry Ritter's permission to 
quote his letter to me that I mentioned last 
time. He was agreeing with me that standardi- 
zation is the key to success in the computer 
business, at least from the standpoint of the 
computer and computer component manufac- 
turers. He points out that I could buy a 20 Mbyte 
hard disk and interface for the IBM compatibles 
for much less than I paid for a pair of 8 inch 
iloppys and interface for the 6809 system. Of 
course much of that price reduction Is due to the 
large volume of such units that are now pro- 
duced. That's the point. The standard IBM Is 
out there in such numbers that the quantities 
have caused competition among the various 
disk drive suppliers. They have been able to 
simplify their designs and reduce costs, or rath- 
er they have been forced to do so in order to re- 
main competitive. 



Teny goes farther and in retrospect, indi- 
cates that the most probable reason for the fail- 
ure of the 6809 was the lack of on chip memory 
expansion. Certainly there were chips availa- 
ble to do that function, but eveiyone who built 
6809 hardware did it his own way and ignored 
eveiyone else. Not only did the software suppli- 
ers have to allow for all the various terminals 
to work with their software, they had to do a dif- 
ferent version for each computer manufactur- 
er's product, further increasing the program- 
ming effort required to cover a relatively tiny 
market. 

A Comment 

I hope I am not getting too repetitious 
with this theme, but I have to point out that 
there has been little new software for the 6809 
for ihe past couple of years. As discussed above, 
the market started out too small, was fragment- 
ed by lack of standardization, and now is 
shrinking because many of the original 6809 
system users have gone on to IBM type systems 
or to 68000 systems. 

I note Just from looking around that OS-9 
68K has a veiy large line of software available 
for It. Just to mention a few, we have Stylo, the 
screen editor that has been popular in 6809 ver- 
sion for many years. I guess I can mention PAT 
and JUST of mine. Then moving into the com- 
piler, we have Microware "C", OmegaSoft Pas- 
cal. Lucidata Pascal, BASIC09, a Fortran, and 
PLuS. There are probably several others with 
which I am not familiar. I hear rumors of an 
OS-9 version of AutoCad and some other pres- 
ently MS-DOS and UNIX running software. It 
would appear that if we have been waiting for 
the 68000 to get off the ground, it has. 

Tills discussion wouldn't be complete with- 
out mention of Peter Stark's SK*DOS which 
seems to be coming along nicely for those of us 
who don't want the complexities of a multi-user 
operating system (nor its price). My only reser- 
vation in this area is the availability of suffi- 
cient software to make it a workable system. 

OmegaSoft Pascal 

My involvement with OmegaSoft and its 
proprietor Bob Relmiller date back several 
years also. We purchased one of the fbst releas- 
es of his "Industrial Strength" Pascal and 
worked with him through a number of releases 
and bug cures. I have always been impressed 
with Bob's veiy quick response to bug reports. 
We eventually completed a veiy large machine 
control system using that Pascal in 6809 ver- 
sion, and got to know Bob pretty well over the 
course of the project. 
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When the 68000 version for OS-9 came 
along. Bob called me and asked if I would test it 
for him. I have to say that I found only a few 
bugs in the early version and Bob has updated 
me with the very latest. 

Though Pascal is noted for its abstract- 
ness. (I mean that in its "purest" form it is pri- 
marily useful for learning how to program, and 
for applications involving calculations or data 
processing), this implementation is veiy useful 
for writing programs that are to be used within 
a computer system and also for Stand-alone 
computer applications in control systems. The 
compiler is veiy fast in the 68020 version, and 
it is written to link in only the runtime library 
routines that are used in a given program. The 
user may write his own I/O routines and substi- 
tute them for those that link to the operating 
system. Therefore, the output of this compiler is 
veiy flexible. 

Though the compiler is multi-pass, pro- 
ducing an intermediate assembler source code, 
Bob has made It very easy to use by supplying a 
number of little utility programs that generate 
the command flies to run the assembler and 
Unking loader. This compiler allows modular 
compilation. That is, a large program may be 
broken down into modules that may be com- 
piled separately and linked together in the flnal 
step to produce the object code. A program 
change in one module then does not require rec- 
ompilation of the entire program, a veiy nice 
time-saving feature, though less so than with 
the old 6809 version because the compiler runs 
so fast on the 68020 system. This is a compiler 
that may be run immediately and easily to com- 
pile standard Pascal programs. However, there 
is great depth here, and a user that needs to do 
something special can expand his capabilities 
with the compiler by writing his own special I/O 
or other procedures. 

Assembler code can be linked to the com- 
piler and whole procedures can be written in as- 
sembler. The compiler package consists of the 
compiler, a relocatable assembler, and a link- 
ing loader. Also included is a "librarian" that 
helps manage user supplied library functions. 
As I mentioned before, there are several utilities 
included to help the user. The one that will be 
used most often is the LC utility (Linkage Calcu- 
lator). It prompts for information about the 
program to be compiled, and geneiates a shell 
command file that can do most of the work for 
you when you compile programs. The compila- 
tion can be tailored to your method of working, 
compiler options, assembler options, loader op- 
tions, etc. All in all. this is a very complete sys* 
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The compiler has double precision float- 
ing point math as well as single precision, so 
you have your choice of fast 6+ digit arithmetic 
or precise 15 digit arithmetic. The double preci- 
sion math uses a 56 bit mantissa and one byte 
for exponent. 56 bit arithmetic theoretically 
has about 17 digit precision, but a siring of cal- 
culations tend to produce some rounding errors 
in the last digit or so (with ANY math package). 
The scientific functions are good to at least 15 
digits. Of course Pascal has a format specifica- 
tion that allows you to specify the number of 
digits printed. While a real Pascal purist might 
turn his nose up at the number of extensions to 
the language, it should be pointed out that those 
extensions don't have to be used. On the other 
hand* a knowledgeable programmer can make 
good use of HEX variables and literal constant 
type specifiers to make the program more un- 
derstandable at ihe source level and to make it 
run more efficiently as well. Someone has de- 
scribed X M as "Pascal with its sleeves rolled up" 
or as a Pascal that is "not afraid to get its hands 
dirty. n This Pascal implementation iits those 
two descriptions very nicely. It has all the fea- 
tures necessary for it to get in and get the Job 
done, be it an application that runs in a sub- 
stantial computer or one that will run in stand 
alone hardware in a machine control or smart 
instrument. 

OmegaSofl Pascal comes with the source 
code to the entire runtime package so the user 
can get in and tune or add things for his own ap- 
plications. I can only say that the company has 
been around for a number of years, has provided 
excellent service, has upgraded the product sev- 
eral times, and is friendly and easy to deal with. 



Late Notes 

We (Hines Industries) have received our 
Peripheral Technology 68008 Single Board 
Computer, We have boih OS9 and SK*DOS for it 
and we will be getting up to speed on it with both 
OS's. We have a couple of floppys and a hard 
disk to install on it as soon as we have the time 
and can get our hands on a power supply for it, 
I'll have a great deal more to report here in the 
near future. 

EOF 
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Mac-Watch 
An Easy 512k Mac Memory Upgrade 



By: 

Joe Britt 



IVot many people still have 128k Macs, but 
those still do may not realize Just how simple 
the upgrade path to 512k is. No, I don't mean a 
dealer mombo-swap upgrade. I mean either you 
or a technically-oriented friend doing it TO your 
128k system. 

First ofT—you must have no qualms about 
opening up your Mac and fiddling about Inside, 
This upgrade WILL invalidate your warranty (but 
if Its a 128k Mac. your warranty is probably 
already gone— unless you have Applecare or 
some similar extension). I take NO 
responsibility for any damages incurred while 
attempting or using this upgrade, nor do I 
guarantee It will be compatible with future 
systems, enhancements, or software. I 
personally use this upgrade on a Mac I put 
together, and have had no problems due to it. 

Now, with that scary bit aside, let's dig in. 
First, a parts list: 

16 256k DRAMS (200ns or faster) 

16 16-pin soldertaH sockets 

1 74F253 or 74AS253 multiplexer 

2 2.2k resistors 



1 47 ohm resistor 

1 Ik resistor 

1 glass . luF capacitor (maybe-depends 

on your mombo) and a maybe a socket 
for the 74F or 74AS253. depending on 
your mombo 

Now you need to deteimine what kind of 
motherboard you have. If you have never opened 
your Mac before, you are In for a treat. First, 
unplug and move away all external cables, 
peripherals, etc. If you have programmer's 
switch snapped on the side, pop It off with a 
small screwdriver. Now lay the computer 
(monitor-down) on a smooth* soft suiface (a 
towel on a table Is good) and remove the 5 Torx 
screws that hold the case together with a Tone 
T-15 screwdriver. Two are toward the bottom, 
two under the handle, and one is inside the 
batteiy compartment. The back and iront are a 
really tight fit. but Just keep tugging until the 
back pops off. Set the back aside. I-ooldng down 
into the machine now. remove the two cables 
which go the motherboard. The mombo should 
Just slide up and out now. Move the front of the 
case aside now, and place the motherboard in 
front of you, remembering static precautions. 
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The first (and most tedious) step Is changing 
the DRAMS. You will recognize them because 
they are all together in two rows of eight, 
surrounded by a white silk-screened box. The 
best way to do remove them (without a 
desoldering station) seems to be this: Using a 
pair of very fine, sharp diagonals, clip out the 
4164's. cutting the pins as close to the chip body 
as you can. Just throw away the old 4164's. At 
first this may seem like a waste, but it's well 
worth it. You could easily destroy your board 
trying to manually desolder each of those chips 
(not to mention destroying half of them from the 
soldering iron's heat). Once you have them 
chopped out. lift out the pin remnants with the 
tip of the iron. Finally, remove the solder left 
with solder-wick, being careful not to apply too 
much heat— you can easily lift traces off the 
board. Now. install each of the sockets and 
solder them In. Finally, plug in the 41256s, 
carefully noting orientation. If you want, you 
can partially reassemble the Mac and power it 
up now t Just to verify that you didn't mess 
anything up. It should come back up as a 128k 
system as usual. If something is wrong, you will 
get a "sad Mac" and an error code. If the flist two 
digits are 02 through 05. then it Is a memoiy 
error, the next four digits are a 16-bit hex 
number that tells which bit was at fault. If you 
get an error, check for broken traces or solder 
bridges. 
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Next, look at your motherboard and see if you 
have a place that an IC could go at location G 13. 
If you do, then you have one of the newer boards 
and are lucky. Just mount a socket there and 
plug in the chip. Since the boards are wave 
soldered, the holes will probably be filled with 
solder. Use solder-wick to remove it. Mount a 
2.2k resistor at locations R40 and R41. and the 
47 ohm one at R42, and the Ik one at RIO. Mount 
the glass cap at C51. Now cut the Jumper labeled 
"Wl". You now have a 512k Mac! Reassemble it 
and test it out. 

If you don't have an IC location at Gl3. then 
you have one of the original motherboards. All 
we have to do Is duplicate the circuitry that goes 
to G13. OK. take the multiplexer and bend all the 
pins straight out except for 2. 8. 14. and 16. 
Piggyback it on the '253 at location F3 and 
solder those pins, noting orientation. You will 
see a row of 7 pads at one end of the 68000. 
Follow the schematic below for connection to 
these pads. Finally, cut the trace that connects 
pads 1 and 2. Reassemble your system and check 
It out-you should have a 512k system now. 

EOF 
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STACKS IN FORTH 

When I originally started to write on this subject, I hac 
planned to show that stacks were easy to understand 
and should be easy for any one to learn to use 
properly. But when I actually started describing 
stacks, 1 realized that they were really not that easy tc 
undei stand without some help. I had as much trouble 
as the next guy understanding FORTH when I was a 
beginner, so 1 thought that I should try to explain the 
operation of the two primary FORTH stacks In pretty 
much the way that I learned. 

like a lot of other people, I first encountered FORTH 
In the famous August, 1980. special Issue of "BY IE", 
llie collection of articles really whetted my appetite 
for the language, so I ordeied the flg-FORTH for the 
6800, along with the infamous Installation guide, from 
FIG. After a minimum of agony. 1 finally finished 
keying in the code and got the FORTH to run. after a 
fashion. Since, at that time. I only had 16K of RAM. I 
was able to hold only a few screens In "virtual 
memory", but It was enough to cause a permanent 
addiction to FORTH 1 

At first. 1 Just copied some screens In order to get the 
system to run, and to tiy to understand what was 
happening. My first confusion was over the Data 
Stack, also known as the Parameter Stack, I had to tiy 
a lot of experiments with short programs, and 1 even 
wrote a crude definition to get a simple stack picture. 
After a while, the concept of the stack operation finally 
sank In; remember, at that time, there were no books 
available on FORTH programming, so I had veiy Utile 
outside help. Mostly. 1 think that my own 
stubbornness was the dectdlng factor in learning to 
use FORTH. In any case. I hope to make learning a 
little easter for todays beginners. 
1 wont bore you with a recitation on how much easter 
It is now for a beginner, but will get right to the point. 



llie Data Stack 

In order to use FORTH wllh any ease, you must learn 
how to use the Data Stack. The Data Stack Is not 
unique to FORTH, but Is used In other structured 
languages, such as C and Pascal. It Is used to pass 
parameters to functions and procedures; that's what 
those words are doing in parentheses at the 
beginning of a function. The difference between the 
Data Stack in FORTH and in C or Pascal is that you 
are encouraged to manipulate the data In FORTH, but 
not allowed to touch the data In C or Pascal, once It Is 
on the stack, lhat's one of the things 1 like about 
FORTH. 

The reason for using the Data Stack. Instead of a 
variable list. Is for economy of RAM and speed of 
execution. Actually, once you become comfortable 
with the stack, you will find separate variables to be a 
nuisance, though sometimes Indlspenslble. 
FORTH wtll support variables. Just as any other 
language does. In fact, you can use variables In 
FORTH In much the same way as you do in BASIC, 
since all variables are automatically global in nature. 
You can use variables to make your programs work 
while you are learning to use the Data Stack; that's 
what 1 did- 

Ihe most common analogy for stack operation Is to 
compare the stack to a stack of serving trays In a 
cafeteria. Only the top tray Is available for use. and 
none below can be used until the trays above It have 
been lemoved from the stack. Iliereibre, you don't care 
how many tiays aie on the stack, as long as there Is 
one for you. but you cant have a tray if there are none 
on the stack. Tiylng to take a tray that Isn't there Is 
known as "stack underflow". 
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If you are using FF9 as your FORTH (or one with 
similar capabilities), you can use DEBUG as a veiy 
effective tutor into the operation of the Data Stack. 
Just pick an appropriate word for examination with 
DEBUG and watch the Data Stack grow and shrink as 
each operation takes place. In fact. I cannot think of a 
better way to learn Just how the Data Stack operates. 
1 can show a greatly simplified example of the Data 
Stack In action in Flguie 1. Suppose that you have 
written an application which requires that you 
calculate the area of a circle, which is 3*1416 * radius * 
radius. If you did this many times In the application, 
undoubtedly you would write a routine called AREA 
which would do this multiplication and return the 
answer, with only the radius as the input to the 
routine. The normal FORTH practice would be to place 
the radius on the Data Stack, call AREA , and expect 
the result to be returned on top of the Data Stack. This 
sequence of operations might be diagrammed as In 
Figure 1 (the nuinbeis in paienthesls show the order 
of execution). 
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llie words AREA , DUP . • . and PI represent whatever 
opeiatlons these words do. It would make the example 
much too complicated to try to Include all of their 
stack operations within Flguie 1. 
As you can see, calculating the area is rather 
complicated as far as FORTH is concerned, but really 
very easy for the programmer. And it is made even 
easier by transferring pai a meters on the Data Stack. 
In any case, notice in the figure that the Data Stack 
always grows from the top. Some of these operations 
consume two or three Items on the stack, but they 
always return only one item back to the top of the 
stack. 

An alternate procedure for accomplishing the same 
thing Is shown in Figure 2, where variables are used 
for parameter passing. 
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Realry the only difference between these two schemes 
is that the programmer has to be conscious of the 
overhead of transferring the paiameters in the second 
method, but that Is all done automatically by the 
machine in the first method. 

Ihls is only a very elementary, and possibly obvious, 
example of using vailables Instead of the Data Stack 
for parameter passing. However, it does show the Idea 
Don't be afraid to use variables until you become 
comfoitable with the Data Stack. Your pi o gram a will 
run slower and be longer, but they will execute. 
Ihere is great power in the operation of the Data Stact 
because it controls the order in which things can 
happen. This can most easily be Illustrated by 
another simplified operation diagram. Consider the 
two definitions: 

:AA23 + 5*7-6/; 

and 

:BB23576 + *«/; 

As you can see from Figure 3 and Figure 4, these 
equations do not produce the same result. 
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rigor* 4. A »l*pllrl«d tUt» st*ck dlagraa illustrating tti« 
operation of th» definition <ra*Tn-i3) 



It has been my excellence that most program bugs 
will show up as problems with the Data Stack during 
the early part of your learning cycle, but that will 
diminish rapidly as you gain experience with FORTH. 
The situation illustrated in Figure 3 and Figure 4 Is 
one of the most common bugs; it results from trying t< 
be too clever with a definition when there Is absolutely 
nothing to gain from ill 

Of course, there is another problem illustrated in 
Flguie 4» having to do with a quirk of "floored math". 
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You would expect the result of the division of 2 by -62 
to be 0, which Is what you will get In fig- FORTH and 
FORTH-79. but not In FORTH-831 FORIH-83 uses 
"floored math", but not flg-FORTH or FORTH-79. 
Remember, the only way to gain experience Is to try; 
literally, nothing ventured- nothing gained. 

The Return Stack 

There Is another stack In FORIH which Is very 
Important, but Is usually not manipulated directly by 
the programmer; this is the Return Stack. Its purpose 
Is Identical to the hardware stack familiar to 
Assembly language programmers. The return 
addresses are stored on this stack, and some very 
fancy and tricky programming can be done by 
manipulating the Return Stack. However, be careful 
and be sure that you know what you are doing, 
because your whole program can blow up In your (ace 
with only a simple mistake here! 

Usually, the only time a FORTH programmer directly 
uses the Return Stack is when he needs some very 
temporal y storage. The word, >R . is used to remove 
the top word of the Data Stack and send It to the top ol 
the Return Stack; the word. R> . does exactly the 
opposite. Therefore, these two words are used for 
temporality storing a number and then recovering it 
before the end of a definition. >R >R will store a 
double-word and R> R> will recover It. Remember tha 
anything put onto the Return Stack must be removed 
before the end of a definition, or the program will 
return to the wrong place at the end of the operation. 
There Is a word, EXIT , which strips the top of the 
Return Stack so that the program sequence will return 
to the next previous calling routine, rather than to the 
one which called the word containing EXIT . EXIT can 
be crudely defined as R> DROP . Think for a moment 
about what that does to stuctured programming and 
shudder. It is very much like a pseudo GOTO . 
FORTH makes a lot of transparent use of the Return 
Stack, so don't be surprised If you run Into some 
hard-to-find bugs, if you blithely go where angels feai 
to tread. 

Other FORTH Stacks 

FORTH normally does not use any other stacks, but 
new ones can be created for special cases. If you are 
doing a lot of string manipulation you might want to d< 
It on a stack, or you might want to build a separate 
stack for processing floating-point math. 
These "stacks'* are usually multi-dimensioned arrays 
with special words for storing and removing data, so 
that they look like a stack to the programmer, but a 
standard array to FORTH. It probably would be 
possible to shift the U and S pointers so as to create 
leal stacks, but I don't know of anyone who wants to 
lake that chance, when the other method works so 
well. With the 6809. there is little difference between 
the time for doing a FORTH stack operation or a 
FORIH array operation, so there is little Incentive to 
do the extra work of having additional true stacks, 

The advantage of extra "stacks'* Is that you can do any 
soit of manipulations on them that you might want 
with a much reduced chance of committing a fatal 



error. One problem with using the Data Stack is 
knowing when enough is enough, if you put too much 
onto the Data Stack, you run the risk of losing youi 
place and not knowing which Important number or 
pointer Is where. Therefore, separate stacks for the 
program housekeeping and for string pointeis can be 
a very good Idea. 

Another use for a separate stack would be foi 
parameter passing for a Pascal interpreter (not 
compiler) written In FORTH. I have often thought that ! 
might go back to Pascal or C for some Jobs if it were 
not such a pain to go through the edlt-complle-debu| 
cycle. Once the program was satisfactorily debugged. 
It could then be compiled in the noimal way. I may 
write such a program one of these days. Just for the 
challenge; I don't think that it would be too difficult. 

Benchmark Gone Awry? 

I want to share with you something which I find 
amusing and absolutely not to be taken seriously! 
I was reading the adds for the MUSTANG-020 and the 
MUSTANG-08. and was attracted by the benchmark 
tests for the 1,000.000 iterations of the empty loop in 
C. so I decided to try the benchmark In FORTH. Much 
to my surprise, with the definition shown in Figure 5. 1 
got the following results: 

FF9 and FLEX at I MHz 39 sec 

LMI 2-80 FORTH and CP/M at 4 MHz 37 sec 

Does this mean that a 6809 running at 4MHz would be 

just as fast as a 10 MHz 68008? "If that were true. 

could a 6809 at 20 MHz match a 68020 at 16 MHz? 

Maybe. Motorola quit too soon on the 68091 

When you couple these results with the virtually sec 

compile time of FORTH, the possibilities of a fastei 

6809/FORTH fairly boggle the mind! 

Too bad I missed getting this Into the April issue. 
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figure 5. S FORTH definition to do 1*000.000 iteration* of en 
«*>ty loop. 

♦♦ Editor's Note: I would guess that It is more a function 
of efficiency of compiled code. For crunching numbers 
I believe FORTH is haid to beat. FORTH was originally 
designed to do precise mathamatlcal functions for 
one of the worlds most advanced glass lens 
telescopes. Math is it's "thing". 

I agree, a high speed 6800 would have been a whiz. I 
have heard of some engineers and marketing types 
within Motorola who feel that Motorola let the ball 
drop by not proceeding with the 6809 as a higher 
speed chip. Actually I have a 6809 that runs much 
faster, but then that is another tale. In some 
applications. 8 bits is better than any larger number 
of bits. But then we all have to have the "bigger" 
because it's "better", right? Or is It?... 

DMW 
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P68000 uLAB 



"One of the best training tools I have 
ever seen 
& very practical also!" ! 

Last month I reviewed an excellent prototype 
S50 (or stand alone system with external power 
supply) for you 6809 buffs. This month I want to 
tell you about a 68000 development system. 1 have 
had a ball messing with this thing* And — what is 
even better I learned a lot about 68000 program- 
ming and Jntei facing. This little beauty Is the first 
computer I have ever taken to bed with mel 

When the P68000 u LAB first arrived. I fell for 
it. It is one of the neatest, compact systems, for 
learning or ocperimenting. I have ever seen. As 
most of you know, I have seen more than several. 
This is one item thai for exceeds it's advertising 
claims. Even the picture doesn't do UJustice. It'a a 
lot of learning and fun for a amall outlay. 

But first, a little bit of background. This system 
Is manufactured and sold by Quasltronlcs, Inc.. 
under license from the University of Plttsbuig. 
Univeisity Research and Development Associa- 
tion. Inc. (URDA). 

URDA was formed to allow its principals and 
employees an interface to Interact wiih industry, 
university and government agencies, and to pro- 
vide services in a number of technological fields. 
This system is Just one example of that project. It 
should be something that anyone interested in 
learning about the 68000 series of microproces- 
sors would be interested In acquiring. Especially 
considering the ]awpl ^ and *+ quality of this sys- 
tem. 

The one thing I found disquieting is the quality 
of the printer used in preparing the otheiwise 
excellent documentation. It appears to have been 
done on a Macintosh and printed out on a dot 
printer. For some reason, I don't get with some 
other products, it seems that an item of ihis level 
of quality deserves better. Fact is. I like it so much 
that I will print the manual on the LaserWriter 711 , 
Just to make things even (if furnished in a Macin- 
tosh compatible text file). It is somewhat akin to 
marrying a beautiful lady only to discover on ihe 
honeymoon she wears a wig and isbaldheaded — 
with warts all over her head. Distracting, to say the 
least. 

Now that I have that off my chest, on to more 
interesting observations. 



When you first open the folder you are im- 
pressed with the planning in laying out the 68000 
system and the loose leaf binder. The binder is 
three sections of heavy duty vinyl with the com- 
puter bolted to the inside thlni cover. So what you 
have is a three section unit, two pages of docu- 
mentation (if beyond the fix st page) on the left and 
the computer on the Tight. All in one compact 
package. Ihe only separate thing is the wall plug 
power adapter, and the optional wirewrap system 
if you ordered that also (which I recommend). 

Ihe system is totally self contained. It was de- 
veloped to enable a student an economical way of 
learning about the 68000. and more important, 
having it available at times regular lab systems 
would be unavailable. Of course this just doesn't 
apply to students, I know many professionals who 
would benefit from owning one of these little 
beauties. I guess by this time you must realize I 
really like mine. I have talked to several others who 
also own one and we all share the same level of 
appreciation for the P68000 uLAB. 

Many of the descriptions given here are ex- 
cerpted directly from the manual. Normally I don't 
do that, but in this case I find no better way to put 
it. 

The package is really a "Notebook Computer", 
containing a 68000 CPU. and all necessaiy sup- 
port (clock, memory, software) on a circuit board 
with a 28 key multi-purpose keyboard, 8 digit 7 
segment hexadecimal LED display, tape I/O. cal- 
culator type power supply, users manual, pro- 
grammers reference manual, complete schemat- 
ics, completely commented operating system and 
utility listings. 

The users manual contains a complete descrip- 
tion of the design crtterta, construction and 
operation. Including examples of all key functions, 
memory map, software utilities, sound genera- 
tion, visual display, timing clock examples and en- 
lightening and nontrivlal exercises for both the be- 
ginner and old pro. 

This is one of a series of educational tools to be 
offered by URDA, and if this is an example, the 
others should also be as well accepted. 

An add-on optional expansion unit is available 
to enable the user to hardwire the unit to actual 
physical devices — LED's, switches, motors, ac- 
tuatois. etc. We received the PWWEB-A wire wrap 
expansion board kit which includes, among other 
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DISASSEMBLERS 



SUPER SLEUTH from Computer Syiiemi Consultants Interactive 
Disassembler; exormely POWERFUL* Disk File Binary/ASCII 
Examinc/3uv)ge. Abtolitfe or FULL Disassembly. XREF 
Gcnertior. Label "Name C anger**, and File* of "Standard Lsbel 
Names" for different Operating Systems. 

Color Computer SSSO Bus (oil w/ AL Source) 

CCD 02K Req'd) Obj. Only $49.00 

F. S. $99.00 - CCF, Obj. Only $5000 U. $10000 

CCF.wfSource $9900 O. $101 00 

CCO, Obj. Only $5000 

OS9 68K Obj. $10000 wl Sour* $20000 
DYNAMITE* - Excellent nandard "Batch Mode" Disassembler. 

Includes XREF Generator and "Standard Label" Files. Special OS -9 
options w/ OS-9 Venioti. 

CCF, Obj. Only $100 00 . CCO. Obj. $ 59.95 

F.S. " * $100.00 . O, objta only $15000 

U, - - $30000 

PROGRAMMING LANGUAGES 



PL/9 from Windrush Micro Systems — By Graham Tcott. A combination 
Editor Compiler Debugger. Direct source -to-object compilation 
delivering fast, compact, re-entrant, ROM-able. PIC. 8 & 16-bii 
Integers A. 6-digit Real nombeit for all ml- world problems. Dired 
control over ALL System resources, including inicmipti. 
Comprehensive library support; simple Machine Code interface; 
step~by-step trmaer for instant debugging. 500+ page Manual with 
tutorial guide. 

F.S.CCF- $19800 

PASC from S.E. Media - A FLEX9. SK*DOS Compiler with a definite 
Pascal "flavor". Anyone with a bit of Pascal experience should be 
able to begin using PASC to good riled in short order. The PASC 
package comes complete with three sample programs: ED (a syntax 
or structure editor), EDITOR (a simple, public domain, screen 
editor) and CHESS (a simple chess program). Tlie PASC package 
come complete with source (written in PASC) and documentation. 
FLEX,SK*DOS $95.00 

WHIMSICAL from S.E. MEDIA Now supports Real Numbers 
'Structured Programming" WITHOUr losing the Speed and 
Control of Assembly language I Single-pass Compiler features 
unified, user -deilned I/O; produces ROMable Code; Procedures and 
Modules (including precompiled Modules); many "Types" up to 32 
bit Integers. 6-digit Real Numbers, unlimited sized Arrays {vectors 
only); Interrupt handling; long Variable Name*; Variable 
Initialization; Include directive; Conditional compiling; direct Code 
insertion; control of the Suck Pointer, etc. Run-lime subromind 
inserted as called during compilation. Normally produces 10% less 
•ode than PU9. 

F. Sand CCF $195.00 



KANSAS CITY BASIC from S.E. Media - Basic for Color Compute 
OS*9 wiih many new commands and sub-functions added. A full 
implementation of the IF-THEN*ELS& logic is included, allowing 
nesting to 255 levels. Strings are cupportad and a subset of t e 
usual string functions such as LEF15, RIGHTS. MUX. STRINGS, 
etc. are included. Variables are dynamically allocated. Also 
included arc additional features such as Peek and Poke. A must for 
any Color Computer user running OS-9. 
CoCo OS-9 $3995 

C Compiler from Wlndrusb Micro Systems by James McCosh. Full C 
for FLEX, SK*DOS except bitfield*, including an Assembler. 
Requires /Ac TSC Relocating Assembler if user desires to implement 
his own Libraries. 

F, Sand CCF $295,00 

C Compiler from Introl - Full C except Doubles and Bit Fields, 

streamlined for the 6809. Reliable Compiler; FAST, efficient Code. 
More UNDC Compatible than most 

FLEX, SK*DOS. CCF. OS-9 (Level // ONLY). V - $575.00 

PASCAL Compiler from Lucldala ~ ISO Based P Code Compiler 
Designed especially for Microaompmer Systems, Allows linkage to 
Assembler Code for maximum flexibility. 

F, S Oitd CCF 5" - $99.95 F. S 8"- $99.95 

PASCAL Compiler from OmegaSofl (now Certified Software) -- For 
the PROFESSIONAL: ISO Based, Native Cede Compiler. Primarily 
for Real-Time and Process Control applications. Powerful; 
Flexible. Requires a "Motorola Compatible" ReJo. Asmb. and 
Linking Loader. 

F. S and CCF - $425.00 - One Year Main* $100.00 
OS-9 68000 Version *$9O0OQ 

KBASIC - from SB. MEDIA ~ A "Native Code" BASIC Compiler 
wbidi is now Fully TSC XBASIC compatible. The compiler 
compiles to Assembly language Source Code. A NEW. 
suxamJtned, Assembler is now included allowing the assembly of 
LARGE Compiled KBASIC Programs. Conditional assembly 
reduces Run-time package. 

FLEX. SfPDOS, CCF. OS 9 Compiler /Assembler $99.00 

CRUNCH COBOL from S.E. MEDIA - Supports large subset of ANSI! 
Level 1 COBOL with many of the useful Level 2 features. Full 
FLEX. SK'DOS File Structures, including Rsndtsn Files and the 
ability to proceis Keyed Files. Segment and link laige programs at 
runtime, or implemented as a set of overlays. The System requires 
56K and CAN be run wiih a single Disk System. A very popular 
product. 

FLEX, SK'DOS. CCF - $99.95 

FORTH from Stearns Electronics - A CoCo FORTH Programming 
language. Tailored to the CoCo I Supplied on Taj*, iransfetable to 
disk. Written in FAST ML. Many CoCo funaions (Gravies, 
Sound, etc.) Includes an Editor, Trace, etc. Provides CPU Catiy 
Flag accessibility. Fast Task Multiplexing, Qean Interrupt 
Handling, etc for the "Pro". Excellent "Learning" tool I 
Color Computer ONLY - $58.95 
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FORTHDUILDER is a stand-alone target •ompiler (crosscompiler) for 
producing custom Foilh sysiems and application programs. 
AU of the 83-standird defining words and c^ntird structures ire 
iraqphal by FORTH BUILDER. 

FORTHBUILDER is designed to behave as much as possible like 
a resident Fonh interpreter/compiler, so that most of the 
esublishod techniques for writing Fonh code can be used without 
change. 

Like compilers for other languages. FORTH BUIIDER can operate 
in "batch mode**. 

Ihe compiler recognizes and emulates target names defined by 
CONSTANT or VARIABLE and is readily extended with 
"compile time" definitions to emulate specific target wotds. 
FORTHBl)[LDER it supplied as an executable command hie 
configured for a speci I ic host system and taiget processor. Object 
code pioduoad from the accompanying model source code is 
royalty-free to licensed users. 
F, CCF, S - $99.95 

DATABASE ACCOUNTING 

XDMS from Westchester Applied Business Systems 

FOR 6*09 FLEX-SK»DOS(5/e rt ) 

Up to 32 gioups/fields per recordl Up to 12 character filed namel Up to 
1024 byte rccoids! User defined screen and print control I Pnxrss 
files! Form filesl Conditional execution! Process chaining! Upward/ 
Downward file linking! File joining! Random file virtual paging! 
Built in utilities I Built in text line editorl Fully session otientedl 
Enhanced forms I Boldface. Double width. Iialics and Underline 
sur^onadl Wiitien in compact structured assembler 1 Integrated for 
FAST executionl 
XDMS-IV Data Management System 

XDMS-IV is a brand new afproacn to data management. It not only 

permits users to desciibe, enter and retrieve data, but also to process 
entire files producing customized reports, screen displays and file 
output, Processing can consist of any of a set of standard high level 
functions including record and field selection, sotting and 
aggregation, lookups in other files, special processing of record 
subsets, custom report formatting, totaling and subtotaling, and 
presentation of up to three related files as a "database" on user 
defined output reports. 
POWERFUL COMMANDS 1 

XDMS-IV combines the functionality of many popular DBMS software 
sysiems with a new easy to use command set into a single integrated 
package. We've included many new features and commands 
including a set of general file utilities. The processing tommanda 
are fnput- Process Output (IPO) oriente which allows almost instant 
implementation of a process design. 



SESSION OR1EN1EDI 

XDMS-IV is session oriented. Enter "XDMS" and you are in instant 
command of all the features. No more waiting for a command to 
load in from disk! Many command* are immediate, such as 
CREATE (file definition), UPDATE (file editor), PURGE and 
DELETE (utilities). Others are process commands which are used to 
create a user process which is executed with a RUN command. 
Either may be entered into a "process" file which is executed by an 
EXECUTE statement Processes may execute other processes, or 
themselves, either conditionally or unconditionally. Menus and 
sctecn prompts are easily coded, and entiie user applications can be 
run without ever leaving XDMS-IV 

ITS EASY TO USE1 

XDMS-IV keeps data management simplel Rather than design a complex 
DBMS which hides the true nnuire of the data, we kept XDMS-IV 
file oriented, The user view of data relationships is presented in 
reports and screen output , while ihe actual data resides in easy to 
maintain files. This aspect peimits customized presenilation and 
reports wiihom complex redefinition of the database files and 
structure. XDMS-IV may be used for a wide range of applications 
from simple record management systems (addresses, inventory ...) 
to integrated database sysiems (order enuy, accounting...) 

Ihe possibilities are unlimited 
FOR 6809 FLEX SK»DOS(5/8*) $249.95 



ASSEMBLERS 

ASTRUK09 from S.E. Media - A "Structured Asiembler for the 6809" 
which Tcquiics the TSC Macro Assembler. 
F,S,CCF. 199.95 
Macro Assembler Tor TSC ~ Ihe FLEX, SK»OOS STANDARD 
Assembler. 

Sptciai - CCF $35,00; F, S $50.00 
OSM Extended 6809 Macro Assembler from Uoyd I/O. ~ Provides local 
labels. Motorola S records , and Intel Hex records; XREF. 
Generate OS-9 Memory modules under FLEX, SK'DOS. 
FLEX, SK*DOS, CCF, OS 9 $99.00 
Relocating AsMmbter/Linklng Loader from TSC. — Use wiih many of 
the C and Pascal Compilers. 
F, S, CCF $150.00 
MACE, by Graham Trott from Windrush Micro Systems — Co Resident 
Editor and Assembla; fast interactive A.L. Programming for small 
to medium-sized Programs. 
F, S, CCF ♦ $75 DO 
XlvUCE - MACE w/Cross Assembler for 6800/1/2/3/8 
F t S, CCF ♦ $98D0 
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UTILITIES 

B*s)c09 XRcf from S.E- Media - This Baiic09 Crocs Reference Utility 
it ■ Bastc09 Program which will produce a "pretty piimed" lining 
wiih each tine numbeicd, followed by a complete oo» referenced 
Hiring of all variables, external procedures, and line numbers caUed. 
Alio includes a Program lid Utility which outputs ■ fast "pretty 
printed" lifting wiih line numbeis. Requires Bnk09 or RunB. 
O A CCO obj. only .. $39.95; wf Sourm - $79,95 

CTree Routines' ♦ Complete set of routines to allow tan pie 

implaneniaiion of keyed files - for your programs - running under 
Basic09. A real time saver and s outd be a part of eveiy serious 
programmers tool-box. 

O A CCO ob). only + U9.95 

LuddaU PASCAL UriLITlES (Requires Paical ver 3) 

XREF ~ pnxfcee a Cross Reference Listing of any text; oriented to 
Pascal Source. 

INCLUDE - Include other Files in a Source Text, including Binary - 
unlimited neiiing. 

PROFILER - provides an Indented. Numbeied, "Stwctogram" of a 
Pascal Source Test File; view t e overall structure of large 
program*, prog/am integrity, etc. Supplied in Paical Source Code; 
requires compilation. 

F.S.CCF^EACH 5" S40D0, 8' ■ S50D0 

DUB from S.E. Media - A UnlFLEX BASIC decompiler Re-Crenc ■ 
&xmz Luting from UniFLEX Compiled basic Programs. Works 
w/ ALL Versions of 6809 UniFLEX basic. 
U~ $219,95 

LOW COST PROGRAM KITS from Sou I heist Media The following 
kits are available for FLEX* SK'DOS on either 5" or 8 H Disk. 

1. BASIC TOOLCHEST $29.95 
BUSTER.CMD: preuy printer 
UNEXR£F.BAS: line eras referencer 
REMPACBAS, SFCPACBAS. COMPACBAS: 
ronove superfluous code 

STRIP. B AS: superfluous line-numbers stripper 

2. FLEX, SK'DOS UTILITIES KIT S39.99 
CATS. CMD: alphabeiically-soncd direaory listing 
CATD.CMD: date-sortad directory listing 
COPYSORT-CMD: Tile copy, alphabetically 

COP YD ATE CMD: Tile copy, by date -order 

FILEDATE.CMD: change fik creation date 

(NFO.CMD (A CNFOGMX.CMD): tells disk attributes A contents 

R£UN1CCMD (A RBUNK82): re-orders fragment free 

chain 

RESQCMD: undeletes (recoven) a deleted Tile 

SECIORS.CMD: show sector order in free chai 

XLCMD: super text lister 



3. ASSEMBLERS/DISASSEMBLERS UTILITIES 

$39.95 
UNEFEED.CMD: <nodularvM f disassembler output 
MAT1LCMD: decimal, hex., binary, goal conversions 
A tables 
SKIP.CMD: column stripper 

4. WORD - PROCESSOR SUPPORT ITHLITIES 

$49.95 
FULLSTOP.CMD: checks for capitalization 
BSTYCIT.BAS OB AC): Stylo to dot -matrix piinterr 
NECPRINT.CMD: Stylo to doc-matrix piintn fdier code 

5. umrriES for indexing $49.9s 

MENU.BAS: sele/u required program from list below 
INDEX. BAC: word index 
PHRASES.BAC: phrase index 
CONTENTBAC: tabte of contents 
INDXSORT.BAC: fast alphabetic sort rouiine 
FORM ATER. BAC: produces a 2-column formaued index 
APPEND.BAC: append any number of Tiles 
CHAR BIN: line reader 

BASIC09 TOOLS consist of 21 subroutines for Basic09. 
6 were written in C Language snd the wnairakr in assembly. 
All t e rctrtinea are ocvnpDed down to native machine code which 
makes them fast and compact. 

1. CFILL - Jills a string with characters 

2. DPEEK - Doubte pack 

3. DPOKE ~ Double poke 

4. FPOS - Current file position 

5. FSIZE - File size 

6. FTRIM - removes leading spaces from a string 

7. CETPR - returns the current proosis ID 

8. CETOPT - gets 32 byte option section 

9. GETUSR - gets the user ID 

10. GT1ME ~ gels the lime 

I L INSERT - insert a siring into another 

12. LOWER •• converts a string i to towercase 

13. READY ~ Qtecks for available input 

14. SCrPRIOR - chan cs a process priority 

1 5. ScrtlSR ~ chan es the user ID 

16. SCrOIT - set 32 byte option packet 

17. ST1ME - sets the tone 

18. SPACE - adds spaces to a string 

19. SWAP ~ swaps any two variables 

20. SYSCALL - system call 

21. UPPER - converts a string to uppercase 
For OS 9 - $44.95 • Includes Source Code 

See Review in January 1987 issue of 68 Micro Journal 
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SOFTOOLS 

The following pragma are included in object form for immediate 
application. PU9 source code available for customization. 

READ- ME Complete instructions for initial set-up and operation. Can 

even be primed out with the indudad text pfoczstor. 
CONFIG one time system coniiguresJorL 

CHANGE changes words, characters, etc globally to any text type fOe, 
CLEANTXT converts text files to standard FLEX, SK'DOS files. 
COMMON compile two text files and reports differences. 
COMPARE another check file that rcpons mil matched lines. 
CONCAT similar to FLEX. SK*DOS append but can also list files to 

icjecn. 
DOCUMENT for PU9 source files. Very useful in examining parameter 

passing aspects of procedures. 
ECHO echos to either sotdi or fdc- 
F1ND an improve find command with "pattern" matching and wildcards. 

Vety useful. 
HEX dumps files in both hen and ASCII. 
INCLUDE a file copy program Out will accept "includes" of other disk 

files. 
KWIC allows rotating each word, on each line to the beginning. Vety 

useful in a son program, etc. 
LISTD1R a directory listing program. Not super, but better than CAT. 
MEMSORT a high-speed text file sorter. Up to 10 fields may be sortad. 

Vety fast. Very useful 
MULTICOL width of page, number of columns may be specified, A 

MUST I 
PAGE simitar to LIST but allows for a page header, page width and 

depth. Adjust for CRT screen or printer as set up by CONFIG. A 

veiy smart print driver. Allows printer control ooxwnanda. 
REMOVE a fast file delete*. CartfuL no prompts issued. Zap. and iu 

gonel 
SCREEN a sates listing milky. Word wrap* text to fit screes. Sera 

depth may be altered at run time, 
SORT a super version of MEMSORT. As»ding/des<awdmg order, up 

to 10 keys, case over-ride, sort on nih word and sort on characters if 

file is small enough, sons in RAM. If large file, sort is constrained 

to size of your largest disk capacity. 
TPROC a small but nice text formatter. This il a complete formatter and 

has functions not found in other formatters, 
TRANSLIT sorts a file by x keyfidds. Check* for duplications. Up to 

10 key files may be used. 
UN ROTATE used with KWIC this program reads an bipit file and 

unfolds it a line at a time. If the file has been sorted each word will 

be presented in sequence. 
WC a word count utility. Can count wurd*. character? or lines. 

NOTE: this set of utilities consists of 6 5-1/4" disks or 2 8 H disks, w/ 
source (FL9). 3 5-1/4" disks or I 8" disk w/o source. 
Complete set SPECIAL INTRO PRICE: 

5-1/4" w/source FLEX - SK'DOS . $129.95 

w/o source - $79.95 

8" w/source . $79.95 - w/o source $49.95 



FULLSCREEN FORMS DISPLAY from Computer Systems 

Consultants - ISC Extended BASIC program Alports any Serial 
Terminal with Cursor Control or Memory-Mapped Video Displays; 
substantial) y extends the capabilities of the Program Designer by 
providing a table-driven method of describing and using Full Scream 
Displays, 

F. S and CCFs V-S25J0O,wt Source - SSO0Q 

SOLVE from S.E. Media - OS-9 levels I and H only. A Symbolic 
Object/Logic Veiilication & Examine debugger. Including inline 
debugging, disassemble and assemble. SOLVE IS THE MOST 
COMPLETE DEBUGGER we have seen for the 6809 OS-9 series! 
SOLVE docs it all! With a rich selection of monitor, assembler, 
disassembler, environmental, execution and other miscellaneous 
commands, SOLVE is the MOST POWERHJL tooUit item you 
can own) Yet, SOLVE is simple to usel With carry/aae 
documentation, a snapl Everyone who has ordered this package has 
ravedl See review * 68 Micro Journal - Ofcxsahes 1985. No blind 1 
debugging here, full setter* displays, rich and complete in 
information profited. Since review in 68 Micro Journal, this is our 
fastest moverl 

Levels / & II only . OS.9 $69.95 



DISK UTILITIES 

OS-9 VDIsk from S.E. Media - For Level I only. Use the Extended 
Memory capability of your SWTPC or Gimix CPU card (or similar 
foimat DAT) for FAST Program Compiles, CMD execution, high 
speed interprocess communications (without pipe buffersX etc. ■> 
SAVE that System Memory. Virtual Disk size is variable in 4K 
inensdments up to 960K. Some Assembly Require! 
Lave// OS*9 obt\ $79.95. w/ Source 5749,95 

O-F from S.E. Media - Wiitten in BASIC09 (with Source), includes: 
REFORMAT, a BASIO09 Program that reformats a chosen amount 
of an OS-9 disk to FLEX. SK*DOS Fonnat so it can be used 
normally by FLEX.SK*DOS; and FLEX, a BAS1C09 Program that 
does the actual read or write function to the special O-F Transfer 
Disk; user-friendly menu driven, Read the FLEX, SK*DOS 
Directory, Delete FLEX. SK« DOS Files. Copy both directions, etc. 
FLEX. SK* DOS users use the special disk just like any other FLEX, 
SK'DOS disk 

O. 68O916&OO0 179.95 

LSORT from S.E Media - A SORT/MERGE padtage for OS-9 (Level I 
A II only). Sorts records with fixed lengths or variable lengths. 
Allows for either ascending or denuding sort. Sorting can be done 
in either ASCD sequence or alternate collating sequence. Right, left 
or no juttifi cation of data fields available. LSORT includes a full 
set of comments and errors messages. 
OS-9 S8S.00 
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HIER from S.E. Madia * HIER is a modern hierarchal storage system for 
users under FLEX, SK'DOS. U answer* ihc needs of tho* e who 
have hard disk capabilities on their systems, or many files on one 
disk - any size. Using MIER a regular (anj) FLEX, SK'DOS 
disk (8 • 5 . hard disk) can have sub directories. By this method 
the problems of assigning unique names lo file* is less burdensome. 
Different files with (he exact same name may be on the same disk. 
as long as tl icy are in different duesaariea, Forihe wtnenesteruser 
this becomes a mint. Sub-directories arc the modem day solution 
that all current large systems use. Each director looks lo FLEX, 
SK'DOS like a regular file, except thej have the extension 
\DIR'. A full »et of directory handling programs are included, 
making the operation of HIER simple and straightforward A 
special install package is included lo install HIER to your particular 
version of FLEX. SK*DOS. Some assembly icquired. Install 
indicates each byte or reference change needed. Typically • 6 byte 
changes in source (furnished) and one assembly of HIER is all that 
is required. No piogramming required! 
FLEX . SK'DOS 179.95 

COPYMULT from S.E. Media ~ Copy LARGE Disks to seven I 

smaller disks. FLEX. SK'DOS utilities allow the backup of ANY 
size disk to any SMALLER size diskettes (Hard Disk to floppies, 8" 
to 5", etc.) by simply inserting diskettes at requested by 
COPYMULT. No fooling with directory ddeiions. etc 
COPYMULT.CMD understands normal "copy" syntax and keeps up 
with files coptad by ma in liming diredories for both host and 
receiving disk system. Also includes BACKUPCMD to download 
any size "random" type file; RESIORECMD to restructure copied 
"random" files for copying, or recopying back to the Host system; 
and FREEUNK.CMD as a "bonus" utility that "relinks" the fnei 
chain of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly language Source files included. 
ALL 4 Programs (FLEX, SK'DOS. 8" or 5') 19950 

COPYCAT from Lucidata - Postal NOT required. Allows reading 

TSC MtnhFLEX, SK'DOS. SSB DOS68. and Digital Research CP/ 
M DUks while operating tsnder SK'DOS ♦ FLEX LO. FLEX 2.0, or 
FLEX 9.0 with 6800 or 6809 Systems, COPYCAT will not 
perform miracles, but, between the program and the manual, you 
stand a good chance of accomplishing a transfer. Also indidei 
some Utilities to help out Piograms supplied in Modular Source 
Code (Assembly Language) to help solve unusual problems. 
F t SandC€F5-~S50jOO F t S 8 m ~$6Sj)0 

VIRTUAL TERMINAL from S.E Media - Allows one terminal to do 
the work of several. The user may sun: as many as eight task on one 
terminal, under VIRTUAL TERMINAL and switch back and forth 
between task at will, No need to exit each one; just jump back and 
fotth. Complete with configuration program. The best way to keep 
up with those background programs. 
O A CCO - obj. only * 549,95 



FLEX, SK'DOS DISK 1/f ILITIES from Computer Systems 

Consultants •. Eight (8) different Assembly Language (w/ Source 
Code) FI£X. SK'DOS Utilities for every FLEX, SK'DOS Users 
Toolbox: Copy a File with CRC Errors; Test Disk for errors; 
Compare two Disks; a fast Disk Backup Program; Edit Disk 
Sectors; Linearize Frce*€hain on the Disk; print Disk Identification; 
and Sort and Replace the Disk Directory On soned oiderX - PLUS 
- Ten X BASIC Programs including: A BASIC Resequenosr with 
EXTRAS over "RENUM" like check for missing label deTiniiions. 
processes Disk to Disk instead of in Mcmoiy, etc. Other programs 
Compare. Merge, or Generate Updates between two BASIC 
Programs, check BASIC Sequence Numbers, compare two 
unsequenced files, and 5 Programs for establishing a Master 
Direcioiy of several Disks, and sorting, selecting, updating, and 
priruing paginated listings of these Tiles. A BASIC Cross Reference 
Program, written in Assembly Language, which provides an X-Ref 
Listing of the Variables and Reserved Words in TSC BASIC. 
XBASIC, and PRECOMPILER BASIC Programs. 

ALL Utilities include Source* (either BASIC or A L. Source Code). 
F.SondCCF -$50.00 
BASIC Utilities ONLY for UniFLEX - $30.00 

COMMUNICATIONS 

CMODEM Telecommunications Program from Computer Systems 
Consultants. Inc. - Menu-Dijven; support* Dumb- Terminal Mode, 
Upload and Djwnload in non-pcotoad mode, and the CP/M 
"Modem7" Chrisiensen prouxsl mode to enable communication 
capabilities for almost any requirement Written in "C". 

FLEX. SK*D0S, CCF. OS 9. UniFLEX. 68000 £ 68Q*h 
Source $100.00 - without Source $50 DO 

X-TALK from S.E, Media * XTALK consists of two disks and a special 
cable, the hookup enables a 6809 SWTPC computer to dump 
UniFLEX files directly to the UniFLEX MUSTANG-020. This is 
the ONLY currently available method to transfer SWTPC 6809 
UniFLEX Jilci to a 68000 UniFLEX system. Gtmtx 6809 users 
may dump a 6809 UniFLEX file to a 6809 UniFLEX five inch disk 
and it is readable by the MUSTANG-020. The cable is specially 
prep tied with internal connections to match the non-standard 
SWTPC SO/9 I/O Db25 connectors. A special SWTPC S+ cable set 
is also available. Users should specify which SWTPC system he/ 
the wishes to communicate with the MUSTANG-020. The X- 
TALK software is furnished on two disks. One eight inch disk 
contains S.E. Media modem program CMODEM (6809) and the 
odtcr disk is a MUSTANG-020 five inch disk with CMODEM 
(68020). Text and binary files may be directly transferred between 
ihe two systems. The C-MODEM programs are unaltered and 
perform as excellent modem programs also. X-TALK can be 
purchased with or without the special cables, bit this special price is 
available to registered MUSTANG-020 users only. 

XTALK Complete (coble, 2 disks) $99.95 

XTALK Software (2 disks only) $69.95 

XTALK with CMODEM Source $149.95 
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XDATA from S.E. Media - A COMMUNICATION Package for the 
UniFLEX Operating System. Use with CP/M, Main Frames, other 
UniFLEX Systems, etc. Verifies Trail amission using checksum or 
CRC; Re-Transmits bad blocks, etc 
U . $299.99 

EDITORS & WORD PROCESSING 



JUST from S.E. Madia — Text Formatter developed by Ron Anderson; 
for Dot Matrix Primal, piovides many unique features Output 
"Formatted" Text to the Display. Ute the FPRINT.CMD supplied 
for producing multiple copies of the "Formatted* Text on the Printer 
INCLUDING IMBEDDED HUHTER COMMANDS (very useful 
at other times also, and worth the price of the prog ram by itself). 
"User Configurable" for adapting io other Primers <ohdcs set up for 
Epson MX -80 with Graftrax); up to ten (10) imbedded 'IVinter 
Control QxnmiDds". Compensates for a "Double Width" printed 
line. Includes the normal line width, margin, indent, paragraph, 
space, vertical skip lines, page length, page numbering, centering, 
fill, justification, etc. Use with PAT or any other editor. 

* Now supplied as a two disk set: 

Disk*!: JUm.CMD object file. 

JVS12.1XTPL9 sown* FLEX. SK*DOS . CC 

Disk W2: JUSTSC object and source in C: 

FLEX.SK'DOS -OS9-CC 

The riSC and regular JUST C source are two separate programs. J1SC 
compiles to a version that expaos ISC Word Processor type 
commands, (.pp .sp ce etc.) Gieat for your older text files. The C 
source ctmpilea to a standard syntax JUSLCMD object file. Using 
JUST syntax (^> ju ,y etc) With all JUST fouiions plus several 
additional printer formatting functions. Reference the JUS1SC C 
source. For rboae wanting an excellent BUDGET PRICED word 
processor, with features none of the others have, lois is ill 

Disk (I) • PIS FLEX only. F.S A CCF - $49.95 
Disk Set (l)-F.SA CCF <ft OS9 (C version) . 169.95 
OS9 68K000 compitit with Source S79. 95 

PAT from S.E. Media - A full feature screen oriemed TEXT EDITOR 
with all the best of "PIE 1 *". For those who swore by and loved only 
PIE, this is for you I All PIE features and much morcf Too many 
features tolist. And if you don't like these, change or add your own. 
PL-9 source fumuhed. "C* source available soon. Easily 
configured to your CRT, with special con/ig senior*. 
Regular FLEX, SK*DOS $129 30 
• SPECIAL MXODUCnON OFFER • $79.95 
SPECIAL PA11JVST COMBO (wtsaurce) 
FLEX.SK*DOS $99.95 
OS 9 68K Version $2291)0 
SPECIAL PAT/JUST COMBO 68K $24900 
Note: JUST in XT source available for OS -9 



CEDRIC from SE. Media - A screen oriented TEXT EDITOR with 
availability of *MENIT aid Macro definitions, configurable 
'permanent definable MACROS' * all standard features and the 
fanes! 'global* functions in the west. A simple, automatic terminal 
config program makei this a teal 'no hassd' pro&xr Only 6K in 
size, leaving the average system over 165 sectors for text buffer * 
■TO*. 14,000 plus of free manoiyl Extra fine for programming as 
well as text. 

FLEX, SK'DOS $69.95 

BAS.EDIT from S.E. Media - A TSC BASIC or X BASIC screen editor. 
Appended to BASIC or XBASIC. BAS-EDIT is transpa^ni to 
normal BASIC/XBASIC operation. Allows editing while in 
BASIC7XBASIC Supports the following functions: OVERLAY. 
INSERT and DUP LINE. Make editing BASIC/XBASIC programs 
SIMPLE! A GREAT time end effort saver. fV^rammen tove ill 
NO more retyping entires lines, etc. Cornptac with over 25 
different CRT terminal configuration overlays. 
FLEX, CCF. SK'DOS $39.95 

SCREDITOR ID fiom Windruxh Micro Systems - Powerful Screen* 
Oiientad Editor/Word Processor. Almost 50 different commands: 
over 300 pages of Documentation with Tutorial Features Multi- 
Col umn display land editing, "decimal align*' columns (AND add 
them up automatically), multiple keystroke macros, even/odd page 
headers and footers, imbedded printer control codes, all 
justifications, "help" suppoit, store common command series on 
disk, etc Use supplied "set-ups", or remap the keyboard to your 
needs. Except for proportional printing, this package will DO IT 
ALLI 

6800 or 6809 FLEX, SK*DOS or SSB DOS, OS 9 - $175.00 

SPELLB "Computer Dictionary" from S.E. Media - OVER 150,000 
words! Look up a ward from within your Editor or Word Processor 
(with the SPH.CMD Utility which operates in the FLEX. SK*DOS 
UCS). Or check and update the Text after enky; ADD WORDS to 
the Dictionary, "Flag** questionable words in the Text, "View a word 
in context" before changing or ignoring, etc SPELLB first checks a 
"Common Word Dictionary", then the noimal Dictionary, then a 
"Personal Word List", and finally, any "Special Word List" you may 
have specified. SPELLB also allows the use of Small Disk Storage 
systems. 

F, S and CCF . $129.95 

STYLO-GRAPH from Great Plains Computer Ca - A full taren 

oriemed WORD PROCESSOR - (uses the 51 x 24 Oisplay Screens 
on CoCo FLEX/SK*DOS. or PBJ Wordpak* Full screen display 
and editing; supports the Daisy Wheel proportional printers. 
NEW PRICES 6809 CCF and CCO - $99,95, 
F.Sor O* $179.95. U - S299S5 
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STYLO-SPELL from Great Plaini Computer Co. -- Fail Compiler 
Dictionary. Complements Stylograph. 

NEW PRICES 6809 CCF and CCO . $69.95, 

F, S or 0- $99.95, U- $14905 
STYLO-MERGE from Great Plaint Computer Co. - Merge Mailing 
Lin to "Form" Letters, Prim multiple FUea, etc, through Slylo, 

NEW PRICES 6909 CCF and CCO • $59.95, 

F, S or 0- $79,95, U -$129 95 
STYLO-PA K — Graph + Spell + Merge Package Oealll! 

F.SorO- $329.95. U - $549.95 

0, 68000 $695.00 



MISCELLANEOUS 

TABULA RASA SPREADSHEET from Compiler Systems 

Consultants - TABULA RASA it similar to DESKTOP/PLAN; 
provide* use of tabular compulsion schemes used for analysis of 
business, sales. and economic conditions. Menu-driven; extensive 
report-generation edibilities. Requites ISCs Extended BASIC. 
F, S and CCF. U - $50.00. wf Source - $10000 

DYNACALC - Qeomnic Spread Sheet for ihe 6809 and 68000. 
F t S, 0S.9 and SPECIAL CCF . 1200 00, U - $395 00 
OS9 68K $59500 

FULL SCREEN INVENTORY/ MRP from Computer Systems 
Consultants - Use the Full Screen Inventory Synan/Matciials 
Requinaneni Planning for maintaining inventories. Keeps item field 
file in alphabetical order for easier inquiry. Locate and/or print 
records matching partial or complete item, description, vendor, or 
attributes; find backorder or below stock levels. Print-outs in item 
or vendor order. MRP capability for the maintenance and analysis 
of Hierarchical assemblies of items in the inventory file. Requires 
ISCs Extended BASIC. 

F, S and CCF, U . $5000, wt Source . $10000 

FULL SCREEN MAILING LIST from Computer Syatemj Consonants 
~ The FuD Scree n Mailing List System provides a means of 
maintaining simple mailing lists. Locale all leonrd* matching on 
partial or complete name* city, stale, zip. or attributes for Listings or 
Labels, etc. Requires ISCs Extended BASIC 

F, S and CCF, U - $50.00, w* Source ■ $10000 

DIEr-TRAC Forecaster from S.E- Media .. An XBASIC program that 
plans a diet in terms of either calories and percentage of 
carbohydrates, proteins and fats (C PC%) org rami of 
Carbohydrate. Protein and Fat food exchanges of each of the six 
basic food gjoops ( vegetable, bread, meat, skim milk, fruit and fat) 
for a specific individual. Sex. Age. Height. Pieaent Weight. Frame 
Size, Activity Level and Basal Metabolic Rale for normal individual 
are taken into account. Ideal weight and sustaining calories for any 
weight of the above individual are calculated. Provides number of 
days and daily calendar after weight goal and calorie plan is 
determined. 

F.S -$59.95, U- $69.95 



CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Computer Systems Consultants •• 
Support* 1 80115. Z^80. 6800/1 ftflfl/1 1/HC1 1. 6804. 68Q5/HCQ5/ 
146805, 6809AW1 . 6502 family. 8080/5. 6G2rVl/2/35*:35739/4GV 
48/C48/49/C49730/8748/49, 8031/31/8751, and 68000 Systems. 
Assembler and listing formats same as target CPU's format. 
Phxiuce* machine independent Motorola S-Text 
68000 or6B09,FLEX, SK'DOS. CCF, OS 9, UniFLEX 
any object or source each » $5000 
any 3 object or source each » $10000 
Set of ALL object $20000 ^source $500 00 

XASM Ova Assembler* for FLEX. SK«DOS from S.E. MEDIA - 
This set of 6800/1/2/3/5/8. 6301, 6502. 608(V5. and Z80 Cross 
Assemblers uses the familiar TSC Macro Assembler Command Line 
and Source Code format. Assembler options, etc., in providing eode 
for the target CPU's. 

Complete set, FLEX. SK'DOS only ■ $15000 
CRASMB from LLOYD I/O -- Supports Motorola's, Inters. Zilog's, and 
other's CPU syntax for these 8 -Bit micropTocrxson: 6800. 6801. 
6303, 6804. 6805,6809. 681 1 (all varieties); 6502, 1802/5, 8048 
family. 8051 family. 808TVX5, Z8.Z80. and TMS-7000 family. 
Has MACROS. Local Labels. Label X REF, Label Length to 30 
Oars. Object code formats: Motorola S-Records (text). Intel HEX- 
Records (text). OS9 (binary), and FLEX, SK'DOS (binaiy). 
Written in Assembler ... eg. Very Fail. 
CPU TVPE - Prke each: 

For MOrOROLA INTEL OTHER COMPLETE SET 
FLEX9 $150 $150 $150 $399 

SKTXDS $150 $150 $150 $399 

OS9/6809 $150 $150 $150 $399 

OS9/68K — — $432 

CRASMB 1632 from LLOYD LO - Suppoiu Motorola's 68000. and 
has same features as the 8 bit version. OS9/68K Object code 
Fonnat allows this cross assembler to be used in developing your 
pogroms for OS9/68K on your OS9/6809 computer. 
FLEX, SK'DOS, CCF, OS+9/6809 $249.00 

GAMES 

RAPIER - 6809 Chess Program from S.E. hfaadia ~ Requires FLEX. 
SK*DOS and Displays on Any TVpe Terminal Features: Four 
levels of play. Swap side. Pomt scoring system. Two display 
boards. Qiange skiD level. Solve Checfcmate problems in 1-2-3-4 
moves. Make move and swap sides. Play white or black. This Is 
one of the strongest CHESS programs running on any 
microcomputer, estimated USCF Rating 1600+ (better than most 
'club' players at higher levels) 
F, Sand CCF > $79.95 
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items, additional IC's, wire wrap sockets (gold 
plated pins), light sensor, assorted linear devices 
and components and assorted connectors, as- 
sembled cables, a batteiy holder for backup, and 
several other items to keep one busy forquite a few 
evenings. 

The following is a listing of the system and it's 
various components, as delivered: 

1 . 68000 CPU - 4 Mhz (remember this Is for 
learning) 

2. 8K bytes of EPROM with: 

a. 4K for monitor and utilities 

b. 4K for user expansion 

3. 4K of static RAM 

4. 5X6 matrix keypad (calculator type) wtth 
12 additional keys user programmable ajfli 
shifted positions 

5. 8 section. 7 segment LED display 

6. 4 additional push type keys (button 
switches): 

a. Hardware Reset 

b. Monitor software 

c. User single bit input 

d. User interrupt 

7. 3.57 system clock 

8. User 8 btt PIA I/O 

9. TWo 50 pin dip connectors for access to 
all 68000 pins, I/O signals, etc. 

10. On board 5v, 1A (TTL) power capacity, 
leaving 1/4 amp for user expansion 

11. PCB 7 1/2 Inches X 10 inches, double 
sided, solder masked with silk screened compo- 
nent identification keyed to the system schematic 

12. System schematic showing all compo- 
nents and connections 

13. Memory space for 6800 type peripherals 

14. 2PIA , sforI/0 

15. 17 IC's 

1 6. Sockets for all critical components (great 
feature!) if you ever stuck a wire to the wrong place 

17. 9 v DC calculator type wall power supply 

18. Software monitor with the following 
functions: 

a. Read/Scan the keypad 

b. Display data on the LED display 

c. Tone generator 

d. Tape read/write routines 

e. Interrupt/Trap vectoring 

f. Break points and single stepping 

19. Hardware interface to inexpensive tape 
units through two 1/8 inch phono Jacks 



20. 
21. 



ual 



60 page users manual 

Motorola Programmers Reference Man- 



Optional accessories either available or In de- 
velopment: 

a. Expansion wire wrap board 

b. Expansion ribbon cables 

c. Piggy-back RAM expansion card for up 
to 16K bytes 

d. Communications module to connect 
multiple P6800 systems 

As I do this review, I am pressed, by a frtend and 
former associate. Bob Nay, again a college prof, 
calling and waiting to borrow and look over my 
system In view of ordering them for his school*. 
For him I will loan mine out, this one time, but for 
the rest of you guys, go get your own. I hate to be 
without mine. I find it invaluable for trying some- 
thing or another, when I get a "spur of the mo- 
ment" flash of genius. I haul it around in my van 
every where I go. Even my dog Charlie is getting 
Jealous of the thing. My wife, bless her heait. has 
gotten used to my affection (affliction) with nifty 
computer things, years ago (I think?). 

This is one product I heartily recommend. It not 
only looks and feels great, but it actually works. 
The LED's light up. the clock ticks (technically it 
pulses), the keypad responds, the speaker beeps, 
the CPU understands and responds to 68000 in- 
structions, the tape routines read and write, the 
RAM does it's thing, what else can I say? It works! 

I didn't And one significant glitch. And it sure 
makes one learn the conservative ways of pro- 
gramming, but then we should always do that 
anyway, right? Also not to be forgotten Is the price. 
It is, simply put, a bargain & all for leas than 200 
bucks! 

For additional information or to order your own 
contact: 



Quasltronics 
211 Vandale Drive 
Houston. PA 15342 



1 800 245-4192 



• O.K. Bob, it's on the way. From an educa- 
tors viewpoint let us all know what you think. 
Ill publish your report when I get my P68000 
uLAB back. Have Fun! DMW 

A stafl Review 



EOF 
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THE ED TEXT EDITOR 

A commercially available text editor and formatter system which 
is written in C and runs on several 68000 systems. 

E, M (Bud) Paaa. Ph.D. 

Computer Systems Consultants. Inc. 

1454 Latta Lane . N. W. 

ConyOT, GA 30207 

404-483-4570/1717 



The ED text editor Is a program marketed 
by Meta Media. Inc. (P Box 292, Atlanta. GA 
30301) for OS-9/68K and for PC clones. 

It is capable of editing files with arbitrary 
contents and of arbitrary size (63000 bytes per 
page). It will support up to nine simultaneous 
edit sessions of the same or different flies. 

ED assumes the use of a keyboard similar 
to that used on PC clones, although this 
default may be modified during the ED 
Installation process. Following are the 
default control keys: 



Q 




w 


begin line 


B 


end line 


R 


screen left 


T 


screen right 


y 


help 


u 

i 




undo 


previous word 


p 


next word 


A 


begin next line 


S 




D 


delete word 


F 


find and replace 


G 


goto next find and replace 


H 




J 




K 




L 




Z 


delete to lirte begin 


X 


delete line 


c 


delete to line end 


V 


insert control character 


B 


center text 


N 


repeat next request 1 times 


M 




Fl 


cut and paste 


F2 


mark and goto mark 


F3 


status 


F4 


goto line 


F5 


scroll screen up 


F6 


scroll screen down 


F7 


buffer large file 


F8 


adjust screen column 


F9 


tow to different window 


F10 


configuration 



up arrow 

down arrow 

left arrow 

right arrow 

pgMp 

pgdn 

home 

end 

file 
ins 
del 
backspace 

cursor 
tab 



move cursor up one line 
move cursor down one line 
move cursor left one column 
move curwor right one column 
display previous screen 
display next screen 
top of screen/ top of file 
bottom of screen, bottom of 

toggle insert mode 

delete character under cursor 

delete character to left of 

move cursor to next tab stop 
abort current contnand 



As might be expected, the installation 
process may become quite complex, depending 
upon the details of the hardware-software 
combination upon which ED and MF are being 
Installed. This process will be covered later, 
as it is one of the current problems with the 
use of the products. 

ED provides an extensive online help 
facility in two ways. The user may enter HELP 
directly from an operating system command 
line or may hit CTRL-Y while in the ED editor. 
In either case. ED displays the first page of the 
list of topics for which assistance Is available. 
The user selects which of the listed topics is to 
be expanded by entering enough characters to 
uniquely identify the topic and hitting 
RETURN. If this topic has another level of 
topics, this process may be continued 
recursively until the desired information is 
found. At any point, the user may htt the 
PGUP key to return to the main help topic 
menu or ESC to exit one menu level. 

Unlike many other editors, s uch as 
Mlcro-EMACS. ED does not define the CTRUS 
and CTRl^O keys, which are used by many 
operating systems. Including OS-9/68K and 
MS-DOS. for terminal How control, and by 
many terminals for the same purpose. This 
allows ED to be used with a wider range of 
terminals and over communications lines or 
between computer systems. 
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THE MF FORMAITER 

The MF formatter Is a program marketed 
by Meta Media. Inc. for OS-9/68K and for PC 
clones. It is meant to accompany the ED text 
editor, although It could be used 
Independently. 

MF has the following capabilities: 



merges mall Hats 

processes multiple files 

allows up to 16 fonts per line 

provides proportional right justification 

optionally builds a table of contents and 

Index 
Includes other files Into a document 
expaitds user-defined macros In the text 
creates text structures such as billets, 

steps, etc. 
outputs multiple part and line headers and 

footers 
supports multiple classes of printers 



MF expands the following sequences 
when found in the text: 



la normal font 

lb bold font 

Ic fixed font 

Id Italic font 

)e equation font 

If footnote font 

Igx get information tx«d, f,n, p, t,w) 

lp periods artd wide spaces to next tab stop 

lq periods artd thin spaces to next tab stop 

It spaces to next tab stop 

I r next word at end at next tab stop 

|u toggle underline 

10-19 user font 

I" superscript 



MF expands the following commands 
when found at the left margin In the text: 



.1-.9 

.bar nn 
.body nn 
.bullet 
.center xxx 
.change xxx 
.define xxx 
.do n 
.exit 

.facing nn 
.font x 
.foot xxx 
. format 
.hang nnn 
.head xxx 
.horizontal 
.Image 
.indent nn 



1-9 level heading 

output horizontal bar 

define additional Indent 

define bullet structure 

center text 

change MF configuration 

define macro sequence 

call macro sequence 

terminate structure 

shift odd/even pages 

change font 

provide page footing 

enable text justification 

define Indent for .item 

provide page heading 

nn nn nn control text placement 

reset all Justification 

indent text from left margin 



.index xxx index text 
.inline xxx control inline commands 
.item xxx produce itemized text 
.Justify enable flush right 

Justification 
.left left* Justify centered text 
. lpi n specify lines per inch 
.macro x xx define single-character macro 
.merge xxx specify text merging operation 
.need nn reserve text lines 
.nextpage nn start next page 



.note nn 
.oddpage 



define note structure 
start odd-numbered page 



.outline nn define outline structure 



.outside 
.page 



place text on outside of page 
start new page 



.paragraph xxx define additional Indent 
enable right margin 
right- justify centered text 
generate roman/arablc page 



. ragged 

.right 

. roman xxx 

numbers 
•run xxx 
.send xxx 

printer 
•skip nn 



execute command line 
send control sequence to 

skip lines 



.source xxx Include file in text 

.step x define step structure 

.tab nn . . nn define tab stops 

.toe xxx add entry to table of contents 

.undent nn iitdent text from right margin 

.urtderline xx underline text 

.vertical nn nn nn control text placement 

.wait pause at end of page 



USE OF ED AND MF 

The first problem encountered when 
attempting to use ED or MF Is a complex 
Installation procedure. Although it is detailed 
well in the manual, a non-technical user 
might find it quite forbidding, especially In 
cases requiring the setup of terminals or 
printers not in the list of devices supported by 
Meta-Media. Meta- Media could materially 
assist the user with Installation scripts, such 
as are provided by many competing products. 

The other problem with ED is that it 
makes heavy use of the PC clone keyboard 
function and special keys. Few serial 
terminals have as many function and special 
keys as the PC clone keyboard. Ihe user must 
define alternate key sequences* materially 
complicating the use of the editor. Other than 
this problem, ED seems to have few of the 
arbitrary features which complicate the use of 
many other text editors and word processors. 

Despite these problems, the PC clone or 
OS-9/68k user with serious word and text 
processing and formatting requirements 
should investigate ED and MF. 
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or 
Things you won't find in the documentation 
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R. Jones, Micronics Research Corp., 
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& Computer Publishing, Inc. (CPI) © 1987 
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i 

A MORE POWERFUL COMPILE COMMAND 

To those readers who have never tried it, I would recommend going one step further, and 
instead of COMPILing directly from XBASIC, making use of TSCs exceptionally powerful 
Pre-Compiler - the XBASIC version being called XPC, for short. It really is a beautiful language 
in which to write programs, and has several immediate advantages : 

L No line-numbers needed. 

2. Meaningful names can be given to Variables or Subroutines, such as : 
IF WEEK_DAY - THURSDAY THEN GOSUB CALCULATE.PAY 

3. By using the V symbol, long statement-lines can be broken up, and 
formatted into blocks, eg 

IF SCALE.WEIGHT = DESIRED_WEIGHT \ 

THEN GOSUB STOP_INGREDIENT_FLOW \ 

ELSE GOSUB XMITJJPDATED.WEIGHT: GOTO WEIGH.MORE 

GOSUB XMIT.FINALJWEIGHT: GOTO NEXTJNGRED 

Compare this with : 

10 IF SW=DW THEN GOSUB 1763 ELSE GOSUB 1984: GOTO 1492 
20 GOSUB 1066: GOTO 1000 

Which do you think will have more meaning a year down the road?? 
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4. A useful Library of subroutines can be built up, and included in 
subsequent programs by library calls, such as S LIB DEFS.LIB 

5. The finally compiled code is exactly the same as that which would 

have been obtained from the equivalent COMPILEd XB ASIC program, but 
how much easier it is to read the source in the XPC version! 

The XPC program itself is written via an EDITOR or word-processor, just as one does with an 
Assembly-language program, or simply converted from an already existing XBASIC program with 
the EDITOR. Once the program is written and saved to disk, it is compiled with the command-line 
below: 

+++XPC file-name or +++XPC file-namel file-name2 

In the first case, the name of the source-file is also given to the compiled .B AC file, but in the 
second the compiled file would have the name filenameZB AC. Try it sometime! You won't regret 
it!! 

AN ERROR IN XBASIC 

Here is an error in XBASIC which will probably never get fixed by TSC now that they seem to 
have abandoned the 6809 in favour of the newer 68xxx chips. Maybe you've already experienced 
it, and been left a little puzzled. What happens is that XBASIC will report ERROR #55 
(Unbalanced Parentheses) in Line XXXX, yet a LIST of that Line will show that such is not the 
case. In actual fact it should have reported ERROR #78 (Undimensioned Array Reference), and 
usually occurs when a DIM statement has been omitted, followed by an array dimension being 
out-of-range in a doubly-dimensioned array. To demonstrate this, assume the following : 

50 DIM A(6,2) 
60 PRINT A(7,l) 

RUNning this program will result in the correct Error-Message ERROR #77 (Array Reference 
out of range), but if Line 50 is deleted and the program RUN again it will give the inconect 
ERROR #55 (Unbalanced Parentheses) AT LINE 60. Probably what happens is that XBASIC 
abandons its computation of A(7,l) when it finds the first digit out of range, and doesn't proceed 
beyond the \\ Thus it doesn't see the second paren. If you simply asked it to PRINT A(7) - with 
no corresponding DIM statement - it will give the correct Error-Message. One of these days, I 
intend to clean this bug out of the system! ! 

THE CHAIN STATEMENT 

CHAIN is normally only used if we have a program which is much too large to Fit in available 
memory, and yet is structured in such a way that when one section has been executed it is never 
used again. The program simply moves into its second half and proceeds from there. In such a 
case I would SPLIT my program into two sections, <game.BAS>, let's say, and <game.NXT>. 
Note that I like to keep the name of the game the same for both sections, and change the name of 
the extension only, so they will be listed together in my alphabetical Master-Directory of all files. 
Herein lies a problem! 

Earlier versions of XBASIC, when executing the CHAIN instruction, made the assumption 
that if a CHAINed file didn't have a .B AC extension then it had to be a regular BASIC type of file 
and was loaded as such. Somewhere along the way, however, newer versions reversed this 
assumption (i.e. if the extension wasn't .BAS then it had to be .BAC) and XBASIC would attempt 
to load it as such, with disastrous results if the program were a .BAS program. Under the latter 
conditions, the First half of the program would execute OK, but not the second - - unless I gave it 
the extension .BAS as well, which, of course, meant giving it a different 'game' name. 
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What to do? Obviously, it meant jumping in and modifying XBASIC once more. My mod 
will only work for later versions which have this problem, but here it is for what it's worth. It's 
quite a small change. Somewhere aiound address $2FAB (6809) locate the code : 

42 41 26 04 A6 0e 81 53 10 26 D9 5F - 

B A s and change it to : 

42 41 26 3038 A6 OE 81 3433 10 3237 D9 5F 
B A C 

SOME ADVANCED PROGRAMMING TECHNIQUES 

Let's begin this section by taking a look at a simple Decimal/HEX conversion routine, which 
you may find useful in its own right : 

10 H$="": INPUT D 

20 REM CONVERT DECIMAL INTEGER TO HEX STRING 

30 E=INT(D/16): F=D-E*16: IF F>9 THEN F=F+7 

40 H$=CHR%(F+48)+H$: IF EoO THEN D=E: GOTO 30 

50 PRINT H$: GOTO 10 

We'll just talk our way around this little program for a while, and see where it leads us. Line 
10 initialises the HEX-string, H$, to a NUL, then requests input of a Decimal-Number - any 
length within reason. Lines 30 and 40 comprise the actual conversion routine, with Line 30 first 
dividing the decimal-number by 16. The quotient is retained in E' and the remainder in 'F (as a 
HEX remainder - 15). Finally, Line 30 prepares the remainders 10 - 15 for conversion to the 
HEX letters A - F by adding 7 to their value. The function of Line 40 is to convert the remainder to 
a CHR$ and preface this to the previously computed value of H$, returning for more calculation if 
E has not been eliminated by the current operation. That is, there is at least one more byte to 
convert. Finally, Line 50 displays the result, and returns to Line 10 for INPUT of another number. 

It's not a particularly remarkable program, though it does its job quite well, but it will serve our 
purpose for what is to come. Before we continue, however, note the useful programming 
technique of indenting REMs by one space only, and the rest of the program by 2 spaces. This 
makes it easy to locate all the REMs in your program listing. 

There doesn't appear to be much we can do to improve this short 2-line program, does there? 
Line 40 seems to be forced on us because it MUST be executed whether or not the IF condition in 
Line 30 modifies F to F+7, so there would appear to be no way we can comfortably tack Line 40 
onto the end of Line 30 and still get the program to work properly. Normally, in the IF-THEN 
situation existing in our example, this would be true, BUT ... there is a neat way to eliminate the 
IF-THEN altogether, yet still achieve the same effect. We do this by compressing the IF-THEN 
into a compact logical function and including it in the CHRS$ function. Thus : 

30 E=INT(D/16): F=D-E*16: H$=CHR$(F+48-7*3(F>9)): IF EoO THEN D=E: GOTO 30 
40 deleted 

Let's examine the extra enclosure -7*3(F>9) in a little more detail. The part (F>9) makes 
use of XBASICs implementation of Boolean logic, whereby the result is -1 if the statement is 
TRUE, and if it's not. So (F>9) will be replaced by -1 or 0, depending on whether it's TRUE or 
FALSE, thus making -7*(F>9) equal to either -7*-l, or -7*0, as the case may be. That is, 
-7*(F>9) becomes +7 if (F>9) is TRUE and if it's FALSE. The end result is that our original 
CHR$(F+48) will evaluate as CHR$(F+48+7) i.e CHR$(F+55) if (F>9) is TRUE, and to 
CHR$(F+48-0) if it's FALSE. 
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If input of r D' is restricted so as not to exceed 32767, we can both shorten and speed up the 
program considerably by replacing 'D f with % D%\ 'E' with l E%\ and so on. Further, this would 
allow E=INT(D/16) to be reduced to E%=D%/16. Well have more to say about this later, but for 
now well stick with our current subject 

Here's another situation where we can make use of logic functions. Suppose we had the trivial 
situation where a message had to be TABbed to say, 30, if the response to a question were " Y" (for 
YES) or to 40 if the response were "N". For example : 

10 INPUT "Do you like this (Y or N) M ,Q$ 

20 IF Q$ = M Y" THEN PRINT TAB(30); ELSE PRINT TAB(40); 

30 PRINT "Good!" 

In this case, Lines 20 and 30 can be combined so : 

20 PRINT TAB(30- 10 * (Q$="N")); "Good!" 

Note that this will give a minimum TAB of 30, but bump it by 10 if the response is "N" (ie 
-10*-1 = +10). A "Y ,r response would evaluate as FALSE, giving -10*0, or change to the TAB 
of 30. And what a saving in program-length! ! 

To close this discussion of logic functions, let's imagine the ridiculous situation where say X 
has to be divided by 10 if Y<=6 otherwise divided by 20. In addition, X has to be multiplied by 1 1 
if Z<=9, otherwise multiplied by 15. Cbmpare this : 

10 IFY<=6THENX = X/10ELSEX=X/20 
20 IFZ<=9THENX = X/11 ELSEX = X/15 
with this : 

10 X = X/(10- 10*(Y>6))*(11-4*(Z>9)) 

With a little practice, you'll soon find it quite natural to read the '*' as IF, and the whole of 
the new Line 10 as : 

Divide X by 10, or by 20 (ie 10+10), IF Y>6 and multiply the result by 11, or by 15 (ie 
11+4), IFZ>9. 

These are but a few typical examples of an unusual use of logic functions, which should serve, 
not only as a guide to more complex functions, but perhaps help clear up the interpretation of any 
such cases you may already have come across. 

INTEGERS AND THE INT(X) FUNCTION 

You may wonder what I could possibly say about these perfectly understandable aspects of 
XBASIC that you don't already know, but well have a go at it anyway. 

In order to get on the same communication wave-length, let's begin by agreeing on a few 
definitions. Firstly, INT(X), where X is a non-integer Floating-Point number is the integer 
immediately BELOW that number. That is to say, INT(5.7) = 5 and INT(-5.7) = -6. It is 
unfortunate that, as of the date of writing, the popular K-B ASIC compiler (which gives one the 
capability of compiling XBASIC programs into machine-code), changes this definition for negative 
numbers, thus making their INT(X) into a TRUNCATE(X). As you read on, you'll see that life 
with INT(X) is complicated enough, without having its meaning re-defined! I wouldn't dream of 
re-working my complete library of XBASIC programs just to accommodate this non-standard 
definition. 
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Secondly, to continue with our discussion, the numbers 1, 13, -IS, etc are Integer 
CONSTANTS, while A%, B% and C% are Integer VARIABLES in the range +/- 32767. The 
numbers 123.456, 0.987 and PI are FP CONSTANTS, while A, B and C are FP VARIABLES. 

OK, now we can get down to some serious business. You'll find that lots of programs can be 
speeded up (quite apart from taking up less room in memory) if as many variables as possible are 
made into Integers. As a case in point, let's consider the simple loop : 

10 FOR I - 1 TO 10 
20 PRINT I; 
30 NEXT I 

RUNning this program will produce the following : 

123456789 10 

and if all the Ts are changed to '1%' the result will be exactly the same, only it will happen 
faster. Now let's add another line to the original program and RUN it again. 

25 IF 1/3 = INT(I/3) THEN PRINT "BOING! '; 

Ihis time we'll s*e : 

1 2 3 BOING! 4 5 6 BOING! 7 8 9 BOING! 10 

but not if we change all Ts to '1%' as we did in the first example. This time we'll see 
"BOING!" printed out after each and every number. What went wrong?? 

If we tabulate 1, 1/3 and INT(I/3) we get : 

31123456*789 10 

1/3 0.33 0.66 31 1.33 1.66 32 2.33 2.66 33 3.33 

INTU/3) 31 1 1 32 2 2 33 3 

causing a match at every T which is exactly divisible by 3, whereas 'I%/3' and 'INT(I%/3)' 
are both identical to the line for TNTd/3) 1 above. How can we preserve the intent of the original 
program, and STILL change our Ts to '1%'? Unlike 1/3, where I is FP and 3 an Integer, 
producing a FP result, I%/3 produces the sequence 0, 0, 1, 1, 1, 2 etc because I %3 and 3 are 
both true integers, producing an Integer result. Therefore the solution is to make one of them a 
FP Integer, which will in turn produce a FP result. We obviously can't do this to 1%, but we can 
change the 3' to '3/ (which XBASIC interprets as a FP 3.0000'). This makes Line 25 : 

25 IF I%/3. = INT(I%/3) THEN PRINT "BOING!"; 

and we've achieved the desired result. Of course, an astute reader would also observe that we 
no longer need the LNT() pan either, so we end up with : 

25 IF I%/3. = l%/3 THEN PRINT "BOING!"; 

The left-hand side of the equation now produces a FP sequence equivalent to that of 1/3 in the 
table above, while the right-hand side produces the Integer sequence of INT(I/3) above. And so 
once more we have a match only at every third number. 

Another candidate for conversion is the pattern : 

X=INT(RND(0)*52+1) 
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which creates a random integer in the range 1 - 52, as part of a card- shuffling routine, let's say. 
We would change this to read : 

X% = RND(O) * 52 +1 

Note that we conserve memory in two ways - (i) by requiring only 2 bytes to store the value 
of an Integer as compared to 8 bytes for a FP variable and (ii) by making our program-lines slightly 
shorter. As mentioned earlier, the main effect will be that of spe#ding-up program execution, to the 
point that if there are any delay-loops in your program you may have to adjust the 'target-count' of 
the loop to bring it back to the original delay-time. Keep an eye open for this possibility! 

But ... there are many pitfalls awaiting the unwary - - especially where division is involved, as 
in our first example above, or if we venture into the domain of negative numbers. Also, what 
should we do if, instead of I%/3 (which was easy to change to I%/3.) we have the situation I%/J%, 
where it is impossible to tack a decimal-point onto either Integer? 

Let's examine these different possibilities by considering one line of a program : 

100 A = INT(B/4*C) 

where examination of the entire program shows that A, B and C are always integers in the 
range +/ -32767. A prime candidate for conversion to A%, B% and C%, and elimination of INTO, 
you'd think. Let's test this theory by assigning, let's say, the values B = 7 and C = 5. Under 
these circumstances Line 100 would produce the result A = 8, because INT (7/4*5) = INT(8.75) 
= 8. On the other hand, A% = B% / 4 * C% would give the result as 5. (Why?) Changing the '4' 
to '4.', as we did earlier, will produce the comet result of 8. 

All well and good, but what if we were to replace the constant '4' by a new Variable 'D' to 
which we'll assign the value '4', eg : 

100 D = 4: A = INT(B / D * C) 

It makes no difference when compared to the original Line 100, but in our transformed Line we 
would have : 

100 D%=4:A%=B%/D%*C% 

which would again give the undesired result of '5'. Now what do we do? We have absolutely 
nowhere to tack on a decimal-point! 

A quick and dirty solution would be to change the order of the Variables on the right-hand side 
of the equation to give : 

100 D% = 4: A% = B% * C% I D% (try it, and compare) 

where division is now the last operation to be carried out. This, however, will only work 
correctly if the partial-product, B% * C%, does not exceed the range V-32767, and provided no 
negative results are produced along the way. Try setting B equal to -7 in the original Line 100, and 
compare the end result with B% equal to -7 in the transformed Line. Talk about complications!! 

A more elegant solution would be to preserve the original order of the variables, but to multiply 
the FIRST variable on the right-hand side by the identify for multipcation and division. 
This is equal to T (or '1.' for our purposes), as multiplying, or dividing, a number by T leaves it 
unchanged - that is, it preserves its identity. Similarly the identity for addition and subtraction 
equals T>\ as adding this number to, or subtracting it from, a number leaves the number 
unchanged. So now we'll have : 

100 D%=4: A% = B%* l./D%*C% 
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which should entirely satisfy the transformation. On the other hand, as addition is faster than 
multiplication, maybe we should consider : 

A% = (B% + 0.) / D% * C% 

Well now, who would have thought we could have had so much to say about a simple thing 
like INTEGERS? I've possibly overlooked a few other problems somewhere (let me know if you 
come across any) but this little discussion should at least pinpoint some of them and perhaps offer 
some guidelines for overcoming them. Anyway, my advice to you is to tread warily when you 
venture into the field of Integer- Variables and the INTO function, as it could very well turn out to 
be a mini-field. Don't make any assumptions as to what the result will be, but test your 
assignments and expressions for a range of conditions before making your changes permanent. 

ASC( ), VAL( ), CHR$( ) & STR$( ) 

These four String-Functions seem to puzzle quite a few people, creating problems in deciding 
which to use and where it should be ustd. The definitions in the XBASIC article usually become 
perfectly clear only when you fully understand these little monsters. So let's begin by considering 
them as two sets of twins, ASCO and CHR$() comprising one set and VAL() and STR$() the 
other. 

ASC(I$) will return the decimal ASCII value (not HEX) of the first character in 1$, so if 1$ - 
"Hello" then ASC(I$) = 72, the ASCII value of 'H\ But, if coupled with the use of MID$ or 
RIGHTS, it can be used to give the decimal ASCII equivalent of any single character in the string. 
Thus ASC(RIGHT$(1$,1)) =111, which is the ASCII value of 'o\ the right-most character of the 
string.CHR$(I%) is the exact opposite, in that it generates the ASCII character equivalent of 1% so 
that CHR$(72), if output to the screen would display r H\ while CHR$(111) would display 
'o'.Keep in mind, however, that this set of twins can handle only one solitary character at a time. 

VAL & STR$( ), on the other hand, can cope with multi-character strings. But, and a big 
'but 1 , they deal only with numeric strings. So, given 1$ = "Hello" and J$ = "123.4", we would 
find that VAL(I$) - because "Hello 11 is not a decimal number, but VAL(J$) = 123.4. Similarly, 
given I m 123.4, then STR$(I) = "123.4 1 '. Big deal, you say. So what purpose do they serve if 
they can handle only decimal numbers, and apparently leave them unchanged at that? 

Perhaps the best way to look at these two is to imagine that VAL is a machine capable of 
transforming a picture of something into the real thing, while STR$ is an instant camera capable of 
producing a picture of a real object. Thus, if we had a short-tailed, black-spotted dog from which 
we wished to produce a long-tailed, zebra-striptd pup (and not having very great medical or 
surgical skills!) we would first of all take a picture of the original. Then we would touch up the 
photograph appropriately (we are much better artists than we are plastic-surgeons), feed it through 
our VAL-machine, et voila, we have our desirtd pup. 

In the same way, we would use STR$(I) to manipulate T in ways which would be difficult, if 
not impossible, to do directly with T. For example : 

10 I = 123.45: PRINT "You have $";I (lets forget PRINT USING for now) 

RUNning this program would produce 'You have $ 123.45', with a space between the '$' sign 
and the T, where an imaginary V sign resides. Here we have a problem if we wish to produce 
'$123.45' from $ 123.45\ Hold on though! Here comes SUPERSTRS to the rescue! We 
re-wiite thus : 

10 I = 123.45: PRINT "You have $ n ;MID$(STR$(I),2) 
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What we've done here is to convert T to STR$(I) - that is, we've changed 123.45 into a string 
of ASCII characters corresponding to the individual digits of I - and then used MID$ to print out 
these characters, commencing with the second, in order to skip the imaginary V. 

Or, to demonstrate an even trickier example, suppose we wished to reverse the order of the 
digits, no matter what the length of the number. Here's how we'd go about it : 

10 J$ = "": INPUT I: B = STR$(I) 

20 FORJ% = 2TOLEN(I$) 

30 J$ = MID$(1$, J%,1 ) + J$: NEXT J%: I = VAL(J$) 

40 PRINT J$,I: GOTO 10 

Line 20 staits looping at a count of 2 in order to skip the imaginary V sign. Line 30 begins 
by using J% as an index to scan through 1$ one character at a time (from left to right) and to keep 
sticking the picked-off characters in front of what it already has in J$. Finally, it uses our 
V AL-machine to produce the desired reversed-order number from J$. Line 40 no doubt will give 
some cause for puzzlement, as it has apparently printed the same number twice. But don't forget 
that 'J$' is a picture-of-the-number, while T is the actual number itself. Just as your reflection in a 
mirror (ignoring left-to-right reversal) may look like you, but it's not really you - only an image. 
Same thing with J$ and I. You can perform arithmetic with I, but not with J$. 

VAL comes into its own in XBASIC programs which require numeric responses from the 
operator. How many times have you accidentally hit a letter (for example, the letter 'O' instead of 
the digit '0') and had your program bomb with a 'MIXED MODE' error-message? Why not try 
something like this : 

10 INPUT "Enter a number ... ",I$: I = VAL(I$) 

20 IF I = THEN PRINT "Invalid Endy!': GOTO 10 

This way your program won't bomb, as an erroneous non-numeric entry for 1$ will still be 
valid, merely producing a VAL of '0', which you trap as an INVALID entry. But what if '0' also 
happens to be a desired response? We certainly don't want to keep bouncing back to Line 10 in 
that event! The solution is simply to insert a Line 15 : 

15 IF 1$ = "0" GOTO 30 

There's only one slight complication here, and that occurs should you enter, say, 12H45 
instead of 12345 (so maybe you've had just one teensy-weensy drink too many!). VAL(12H45) 
would come out as '12', as the conversion process would cease if it comes across a character 
which is not a digit, a V, a '-' or a decimal-point. How do we get out of that little hassle? Well, 
to make sure we've plugged all the loop-holes we would add a new check : 

25 IF STR$(1) <> 1$ THEN PRINT "Invalid Entry!": GOTO 10 

What we are doing here is to use our instant-camera STR$ to take a pictuie of T (which could 
be a genuine '12' or a fake '12 1 produced from '12H45'). We then compare this picture with our 
original entry of K, and if they don't match we know something has gone wrong, so we return for 
a new entiy. Of course, to save a lot of repetition, we would actually re-write Line 20 to read : 

20 IF I = OR STR$(I) o 1$ THEN PRINT "Invalid Entry!": GOTO 10 

111 wager that most readers didn't latch on to the fact that our Line 25 is sufficient unto itself, 
and that we don't need the check 'IF I = 0' any more! But don't feel too badly about it, as it 
doesn't exactly stick out like a sore thumb! Study it for a moment and you'll see that our new 
ch#ck actually includes this one in its function. 

To Be Continued Next Month 
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Lury Williams 
'68 Micro Magazine 
5900 Cassandra Smith Rd 
Hiason. TN 37343 



Dear Mr. Williams, 



I am pleased lo announce a successful new addition lo our product 
line for Ihe G 64 bus: A complete tingle board system based on the 
68000/68OIO processor, with a large capacity of on board I/O and 
memory. 

We expect this product to be enormously successful since it combines 
the most attractive features of our current two ben selling boards. 

We would be pleased if you could share this important information 
with ihe readers of your publication. Enclosed is a press kit we 
prepared to Ihat end. 

Please feel free to call me if yoo have any questions or need 
additional information. 

Sincerely, 



Cosma Paboucisidis 
President 

CP/t 
Enclosure 
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1*> VSa. Cantata 
CovnaPaoouetiob 
GESPAC inc. 
SOW WoovefAvt 
M«sa.AZ&S202 
(662)962 S5$9 



In Eiaopa Contact 

eoOWMa 

GE3PACSA 

a H228 Geneva 

(022) 7i 5400 



GESPAC INTRODUCES HIGH INTEGRATION 6*flO<V6gOIO 
SINGLE BOARD SYSTEM FOR THE (i-W BUS 

MESA. AZ. APRQ. 24. 19B7 GESPAC introduce* a break through in 
board density and funroooaliiy. The GESSBS-6 k> ■ 680CD bawd 
(68010 optional) wnple bond cmcfDCompuier system, requiring 
Kiriieiem EPROM. RAM. and I/O capacity id be used stand alone in a 
number of imbedded process control and instrumentation 

appUmiom- The GESSBS-6 is built on ■ standard single heighi 
Eurorard of 100 by 160 nulhmeterj and I* fully expandable throogh 
tbeG-64bu*. 

The G-64 bus is an caty-lointcrface no* multiplexed 16-bii bus 

aimed at mid range industrial OEM applications. The G»64 bus is an 

open architecture •uppnnnd by 40 independent rnanulaaarens of 
wnkh 5 are located in North AnaTua. 

The GESSBS-6 uses ■ 68000 <* 68010 16732-bit mfcropnarestfr 
running m D or 16 M>fe, WWn using the 68010, ihe board U 
approKimaiely 40% faster th«n with (he 68000, The bpajd has four 
32-pin JEDEC sockets capable of holding 4 EPROM* wish capacity up 
to 512 kilobytes. The sockets can also be configured with rwo 




EPROMs and rwo CMOS RAM chips for a total capacity of 156 
kilobytes of EPROM and 64 btfobytes of RAM 

The GESSBS-6 is equipped with 256 kilobyte of icny wut-iaies 
CMOS RAM. The RAM is suiomaricaHy powered from the external 
Unay backup in case of power failure. In this configuration, the 
RAM is made of 8 surface- mounted devices located underneath Ihe 
EPROM/RAM (octets. The GESSBS-6 can opoonally be purchased 
without the RAM for use in the simplest ROM -bawd applications. The 
GESSBS-6 can address up to B Megabytes of externa] «nmvry on the 
G-64biis. 

The GESSBS 6 Is also equipped with two RS-232 compatible ferial 
commuAioucm pons. The fast pat is capable of operating in an 
asyoehmnous mode at speeds up to 33.400 baud, and bit or byte 
synchronous protocols such as IBM Bisync, SDIjC and HDLC ai speeds 
of up u> BOO kilobits per aeco^L The somad pojt is provided for use 
in asynchronous mode ocily at speeds up to 3&40Q baud. 

The GESSBS-6 is also capable of controlling external digital devices 
through the use of two dovbk buffered 8-bit parallel I/O pons with 
four haodshalc tines. There are three 16-bit omen which can be 
combined to form a single 3Z-b« timer. The board also includes a 
watchdog timer, which* when enabled, will reset the CPU in ease of 
program failure. thus ensuring corrcci operation under all 



A Real Time OcckrCxlenda* is provided on the board to allow the 
user's program u> keep track of the day and amc The clock device ii 
pcrwoed by an onboard lithium battery 

The GESSBS 6 is supported with Mtcroware Cotp's OS 9 "Uni* Like" 
Real-Time. Multitasking disx operaong system. This opcraling 
system provides an ideal software dcvetopmcni environment for real 
time indusrnaJ systems. OS 9 is modular and can be ROM able in a 
diskless system. 

The GESSBS 6 is available today for $750 wiih an 8 MMi 61000 CPU 
without RAM. The 8 Mliz version whh 256 kilobytes of RAM ia 
available for $995. Prices are for 50 pieces quantity orders. 
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! ftCMtOft MULTI-LIHK LAPO 



Auatln, hiu, Hat U, 1*17... 
Ftvtk^ta Croup «nnouiwk« tha. Mce460t Multi-Link LAPD Controller 
{MXAFD) . Tba MC6e404 im a link level prctoCD 1 procaaaor for 
high ■!■■< date tranafar application* In boat csammitere and 
intelligent and point a and for 1 8 DM a loaning application* in 
packet evltching equipment, Tne MXAPO la the only VLSI device 
to oo^letely Implement tha CCITT Q.920/Q.921 Link Aeoeee 
P iva-aal ure for tha antira bandwidth of a prlaary rata Intaqratad 
servioea Digital network (ISDM) lnterfece. IAPO la tha 
propoead iuvUxw l for uaa at tha link laval {ISO- level 2} for 
both elgmalllng and data tranefer In unt eonriqurationa. fhia 
VUI davlca provide* a coat effective eolutlon for XsOM link 
laval praoaaalag, vtall* encouraging a universal laplaaantatlon 
of the LAPC protonni. 

Tba MC«f«0« la compatible with AT&T apaclflcatlon for I5DM 
davlcaa and wee davalopad with information aupplled by ATIT. 
oogr KfTtcrrvE ibdm soarrioa 



resigned in 1.9 alcron HCMOS, tha MC6J606 faaturaa lov power 
coneuaptlon. aa wall aa high performance, with aarlal data 
rataa In eaceee of 2.o4f aegebite par aacond (Mbpe) . Thie 
Intelligent coaaunlcatlona protocol control lar waa doelgned to 
ba uaad In high apaad data tranafar application* between boat 
compwtere and worketetlone, taking advantaga of tba bandwidth 
provided by Mil and M12 channala and tha capabllltlaa of IsqM 
coapatlbla packat ewltch\ng equipment. Tha MLAPD la alao ldaal 
for uaa lnalda tha ISDM awltch controllar aa a link laval 
elgnelllng procaaaor. Tha bandwidth performance of thla VLSI 
davlca will allow producta to raaliia aignificant coat aevlnge 
by aovlng away froa tha 6<Kbpe channallxad approach for prlaary 
rata bandwidth allocation originally dlctatad by analog 
tachnology in favor of tha battar utilization offarad by 
allocation of tha antira prlaary rata bandwidth on a daaand 
baela aa digital data awitchlng capabllltlaa avolva. 
tmLIlEa DKIQP1 -MODULAR OMBIGU APFHQACH " 

Baaad upon a proven, aodular aarlal coaaunlcatlona procaaaor 
daaign, tha KLAPO la tha third product In a aarlaa of aarlal 
procaaaor unlta (SPU> froa Motorola fin attachad SPO dlagraa). 
including tha MC4t«09 St. 29 Protocol Controllar and tha nCtee2« 
Tokan Bua Controllar. Aa a powarful nlcrocoded angina, tha 
RXAFD provldaa alaultanaoua link laval control on a context 
aw Itched, fraaa by fraaa baala for up to 4192 logical links 
ualng a memory-baaed architecture. On-chip Olract Maaory 
Accaaa <0MA) bua aaatar capability provldaa afflclant tranafar 
of framee and atatua Information to and froa eemory. Tha MLAPD 
la tha flrat Motorola peripheral to offar tha full Motorola or 
tha full Intal ayataa bua lnterfece, aalactabla at powar up. 
•oupled with aupport for both • - and la-bit data bua 
conf lguratlona and dlract addraaalng of up to 16 aagabytaa of 
ayataa saaory, tha MLAPD la aaally tailorad to any 
aicroprocaaaor ayataa daaign. 
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Although tha KLAPO imp lament a a aharad memory baaad 
archltactura, tha MLAPD alao contalna a larga intarnal RAM to 
alniaiia external aaaory raquiraaanta and to Halt ayataa bua 
utllliatlon. ExTemel aaaory requirement a ara furthar raducad 
by parfomlng a translation froa tba data link connection 
idantlflar eontalnad in tha fraaa addraaa flald to a logical 
link Identification nuabar with local algnlflcanca which la 
uaad in tha link laval proceeeing. Whan a ayataa aupport a 16 
logical llnka or leee, thla tranalation la performed by on-chip 
contant addraaaahla aaaory (CAM) . 

Tha MtAPD aaintalna tha flexibility of LAPD flrawara 
iaplaaantatlona by aupportlng prograaaabla protocol paraaatara 
and natwork conf lguratlona. Tha aaaory-raeldent, llnkad 
racalva and tranaait atructuraa coup lad with tha eaekeble MLAPD 
intarrupta aupport a wida varlaty of buffar aanegenent achaaaa. 
With optional aha ring of racalva buffar poo la aaong aultlpla 
logical llnka, tha uaar can efficiently allocate aaaory for 
active llnka baeed upon expected link activity and atet let leal 
engineering aathoda. On tha tranaait aide the ueer deteralnae 
tha MLAFD aarvlclng of guaued information bearing freaoe, 
allowing tha ayataa to tailor link laval handling baead upon 
tha link' a application. 

Tha MLAPD alao provldaa alternate operational aodaa to addraaa 
varying epplicetiona end ayataa environment*, in lta memory - 
to-aaaory operational aoda, tha KLAPO provldaa LAPO fraaa 
procaaaing independent of the ayataa' a phyalcel level 
charecteriatlca to eddreaa channel i tad Tl applicetione end 
local aree natwork application*. By optionally inhibiting lta 
HOLC framing, tha MLAPD aay be aeelly uaad «itb a phyalcel 
level that aupporte e parallel interface, auch ae axlete 
on a backplane in e awitchlng natwork controller or hoat 
co utar. Tha uaer aay aleo activate logical llnka and dlaeble 
MtAPD applicetion of the IAPO proceduree to allow tAPO llnka to 
be nixed with non-IAPD llnke over a prlaary rate facility, 
finally, tha MLAPO davlce aay ba programmed to operate in 
promlacuoua receive aoda where verloue protocol enalyzar 
feeturea may ba Invoked, Including tine etenplng of the 
received link level fraaaa. 





MICRO 
CONTROLLER 




I/O 


DMA 





^=^> 



SPU BLOCK MA ORAM 

The Serial Procaaaor Unlta (SFUa) ere deeigned in functional 
blocka ao that aajor port lone of the chip deelgn cen be reuaed 
in new conf lguratlona, allowing Motorola to gulckly offar new 
chip aolutlone to tha warioua rapidly emerging eommunlcetlon 
protocola. A aicrocodad controller, X/0 interface, end OMA 
aection ara tha three aajor modulae of the 5PUe. By changing 
tha alcrocoda and modifying portiona of tha I/O intarfece, new 
protocola can ba laplaaanted in elllcon. 
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912-440-2140 



EDITORIAL COWTACTi 
Hark Vercruyaae 
5U/9a8-S»04 



P.O. cr> 



RY RlBFOWSIt 

Creen 
P.O. SoX 52073 
Phoenix, A2 »5072 



•XTTOpOlA AKWOWCKS TOT KC68KT&PA, A JSOfTKARZ TOOL FOR 
ftAHUFACTTOIMC AUTOMATION PHTTOCUL (NAP) KXTWRKS 



Austin, Texaa, May 11, 19S7,.. Motorola Microprocessor 
Products Croup announce a ehe MC«SJCTBPA, a real tljaa aoftvara 
tool that epeeda development of token kAta network©. The 
Token Sua Free* Analyser (TBPA) can keep track of atatlatlca 
while eonltorlno network performance, and nhov apeclfic user 
cftoeen framee via an oaay to uii triggering aachenl**. The 
TBPA can atore and diaplay frajuae and trigger baaed on any 
International Standard Organiiatlon (ISO) haadar or any eegeent 
of tha Media acceae control (MAC) data unit. Connecting a TBFA 
to a token-paaalng bue LAM ia tranaparant to tha LMPe 
operation br-euwa tha TBPA la not part of tha tokan-paaalnq 
logical ring. The TBPA la aaay to uae, baaed on a eenu-drlven 
foraet. All tha required Information i« dlaplayod on tha 
■crMfl at all tiaaa, ao no paper ie required. 

Tha TaFA la • aoftvare package that reeidaa on four EPRCHa 
which oparata or a Motorola HVKE172 HAP interface aodule board. 
The KVME372 running the TBFA aoftwara ia coepletely etand-alone 
and re gut re a no backplane bua. Tha only other equipment 
required to aaka the TBFA operational la a aodae that matehaa 
the LAX, a VT100 terminal or equivalent, and a power supply. 
All aodaa oonnectlone are through tha IFF.F. 602 . 4C racoeaended 
atandard Inner race. 

The coat-affactiva TBFA, aalllng for only $2900, will be 
available June 1, 19S7. Discounts are available for multiple 
cop lea. 



£EZ Electronic Specialists. Inc. 

171 Sou* Meto Sea**, Nalkck. Mali. 01 7*0 
(»17> «55 1552 



PRESS riuase 

EXTIWIO RANGE FILTER SUPPHESSOP 

Electronic Specialists announces * KLWJS UH£ CUSSIC, extended 
rang* f I L ter/itippreiaot for alcfo toetputtr prelection. Faaturla 
39,000 Svrge A?»p». *U Joule protection, tha tC leen Llxw Cleaalc 
alao Incorporate* a vldt band. b*lanced«pl filter to h»lp 
el latitat* AC Line alectrltal nolna and Interfere n<«* 

Ootioni iviiUbl* Include aaiter a qui patent control Led Delayed 
Po^er. t-eoote Switch to p*r«lt dvsktop activation end Power 
Fell Interrupt for eutooatU ahut.dDwtt In the event of AC power 
lOftl. 

Modal KLC-SPX-H, 10 Aap, b locket wl th 6 foot card «t »7l.9*. 
From Stock, 



Electronic SpoclaiUts, lnc , 
171 South hain Street 
NatlcV, Halt. 01760 
600.22). *876 



Dear Editor: 

Here is a check for $49.00 (that is, 2 X $24.50), for two 
one-year subscriptions to 68 Micro Journal. Please send 
one year's worth of issues to me at [he address above. 
Please simultaneously send one year's worth of issues to 
[he following person: 

Mr. Sig Haicmann 

Atari Corporation 

1 196 Borregas Avenue 

Sunnyvale, California 94066 

Incidentally, If you or anyone you know would like to 
undertake a nearly impossible job, you or she or he may 
wish to write to Mr. Hartmann at the address above to 
offer your, her, or his services in selling [he Atari ST 
series of computers to VARs or businesses. Atari bears as 
much "toy" stigma as the CoCo, and it has no 
"AtariShack" stores to help it reach consumers. 

Sincerely, 
Bill Lynch 



William C. Lee 
6778 Bullock Dr. 
San Diego, CA. 92114 

Dear Mr. Williams: 

I just wanted to drop a note to let you know that I've 
been enjoying the seiies on Foith. These days, when I 
pull out the tiusty Gimlx 6809, it's usually to do a 
process control test or some highly interactive 
application, for which Foith is quite well suited. I like 
seeing others' insights and solutions—there's almost 
always a clue for everyone. 

I've offered a few assembly tidbits in the past, but 
never taken the lime to say [hanks for years of timely 
and useful 68xxx information. I use (from necessity) 
all the newer machines, but in most ways the Motorola 
processors outperform them- -even the 'ancient* 6809. 

Ill always be proud to be one of those diehards Ron 
Anderson mentioned [hat remember SWTPC et all as 
name brands. 

Anyway, [hanks again, and I look forward to years 
more. 

Sincerely, 
William C Lae 

P.S. What kind or 68000 type articles do you look 
for from the readership? 

Trior's %?U: Tfuody *BiUfor the thougfos. I guns weaMott 
diifards, I fnou* we art, ^ stiff use slrutfy 68XXX systems for 
ALL our applications here at CPI. Then has not come up one 
appUcation that wt have had to go to a w fortign * computer 
system, 'Everything tut nted doing tut can do with our own type 
systems. And programs (ify your 'SOLVE * do muck towards 
m&fytg aU that a reality. 

As to 6SXXX ptvgrumj - most anything that our nadirs can 
team or benefit from. Thousands of us wid appreciate your efforts. 
Thanfjqgam. 

<md*w 
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Dei T1HK.CHP - Correction 

beer Mr. wtlh«in 

Thank you for publishing my articia on TIME.CHD In your April 
1987, lima. 

Th«r« !• a pervarae law a r— vhare that aaya that aa iooa aa 
Boa»«.thlt*9 !■ publlahad. you find arrora In It. 1 found an arror 
in the coda contained In the article. Unlaaa It La correctad. It 
will cauaa fXZX to lock up If the Claw la aal aftar it haa baan 
■at one* before. The problan la caua+4 by the program' a fallura 
wnan tha clock chip la 0*1*9 ■■' to chacn whathar the updata coda 
haa alraady oaari linked to r*LEX. 

Km written, wMCMEVKk tha clock chip la aet, tha progra* aown tha 
updata coda out of tha utility ccwaand apaca and llnka It to 
PLCK. Thla la what you want It CO do if It haa not alraady baan 
linked to FL*X. However, it It haa alraady baan lin*«4 to PLEX, 
tha aacond linking Caueea tha loaa of tha Original add* t«a of tha 
OWARMS juvp In fit*'* diak drlvar*. Thla «ana4 It lnpOaalbla to 
propariy utiLnatell tha data updata coda. Kara Important, it aata 
tha junp at tha and of tha updata coda to point at tha updata 
cod* itaalf. Tha raault ia an endleee loop. Whlla thla win kaap 
tha PLtX data raqiatara currant fOravar, it pravanta uaa of tha 
computer. 

in order to fix thia proolao. tha program ahould bo aodlflod aa 
ahown balow. Tha addad or aodlfiad llnaa ir« Markad with a 
percent algn lil. Tha addad coda chacka to aaa If tha updata coda 
haa baan aovad out of tha utility CC*aaand ■peca BCPOfcl It ax>vaa 
tha coda and llnka it to PLEX. If tha coda haa alraady baan 
mov*d, tha program aklpa tha Instruct ion a which would aovt it 
and link it again. 

X am aorry for tha knconvanlanca which thla bug cauaad anyona. 
Thaaa oodlf icatlona ahouid fis it* 

Slncaraly 




»/mjJQ£*fT TOOLS fOfi 
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36 i Drake' a View Or. 
Invarnaaa. Calif, MfJT 

Corrections to Source Code for 
TIME.CMD 

* IF RAMLOC ZERO* HOVE HEHEND 

BNE TZME9 SKIP IF ADDR. ROT EO. 

LDD MEMEND GET OLD MEMEND 

SUBD ENDHOV-8BCMOV 

STD HEHEND SAVE RESULT 

TPR D,Y HOVE DESTINATION TO Y 

• CHECK IF TIHE CODE IS ALREADY H0V6D % 
TIKE9 LDD #Y CET CODE AT DESTINATION % 

CHPD SETSYS ALREADY SET? I 

BEO TIME 10 YES. SKIP HOVE % 

PSHS Y SAVE IOCATJON OP CODE I 
TIHE91 LDA , X* HOVE DATA 

STA ,Y«- 

CHPX 2,S DONE? 

BNE TIHE 91 

PULS X.Y CET DESTINATION. CLEAN STACK 

STX DWARH*1 STORE LOC. OF CODE IN DWARM OPERAND 
TIHE 10 LBSR PRDATE PRINT DATE/TJHE 
EXIT JKP WAFHS 



/\CT AppM*d Computar Tewrmok^gy, Ino. 



Hi. Larry Wfclllaft* 

6* Bicro Journal 

3900 Caeeanara Saith Road 

Miaaon. Tl 3734? 

0*ar Utiy; 

Incloaed it tha docu>ar>tat *on and naw prog ran rilafc for vtraion 
2.2 of our eTraa ftcutlnvi, TMa ching* corracrta a potential 
problaa I dlacovarad uhlla cofwartin* eTraa to tha C laaatiaae. 
To my Knowladfla. ao uaar haa avar found thla problaa* 

tha problaa on If occurs on an G99 laval two ayataa uhan t*0 Or 
wrt uwawa ara alaul tanaoualy iecta«in| tha ••»• flla. If ona 
yaar ia aaquaot tally atapplre through tha t j la with ~haat" or 
**Pra*»ioua~ call* and an«th«t uaa>r adda or aalataa a kay in tha 
aaaa bloek tha flrat uiar la slapping through, tha flrat yaar m%f 
aiaa a Mar or mmm tha mmmm hmy l.wlca* 

Aa you can ••« , tha prohlaa la not vary lihaly to occur, but I 
certainly don't want to laava any hnown problaaa in tha pacnaga. 
Unf«rtun«taly« tha cneoaa la rathar aatenaiva and cannot ha flxad 
with Juat an arrata ahaat or aoaa aiatJar aathod. In addition,, 
tha dACUMnt at Ion haa baan changad. 



wtw froooct ASioaHctiairr 

A a ioi la-board coeputar callad tha LAB 6609 ia daaignad to 
•trvt aa prototyping tool in tha davalopawtnt of applications 
vfeich uaa tha 6809 ancroproceaaor. Thia product ia uniqga in 
providing wirawrapping area for 170 on tha aaae board aa tha 
■icroproceaiort thua allowing Daxiaitfa parfomanca without 
buffer dalaya. 

On-board faaturaa include juapar aalaction of 1 or 2 MHi 
operation with proviaion for aubatitution of a uaar cryatal, 
811 of RAM/ I0H/E FtOK, an 1S-232C aarial port with joajpar- 
aalactabla baud rataa froaj 75 to 31,400 baud, a 4-bit latch 
which can extend the addreaa range to 1 oegabyte on the 
$5-50 buflr and proviaion for up to 4 woltaga regulator*. 

A hXDT cycle atretch circuit with aynchronoua clocking allowa 
uaa of alow EPAOHS (350 or %50na> at 2 HRa with gjiniajuai delay 
of 1/2 eye la (250 ne). Synchronoua e locking eliannetea 
latch-up problaaa with the internal 6809 KRDY flip-flop. 

The 9.5** by 6.25*' board haa ailkgreaned lebele on both aidea 
to facilitata wiriwrapping and teating. The large wirewrapping 
araa (22 aq . in.) ia provided with buffered addreaa, data and 
eontrol aignala, Including five independent aelect linea on 
16-byte boundarioa, aienlar to SS-30 alot aelection. Signala 
are arranged to aceoajodate a aecond 6850 AClA or 6840 PTK, 
and a 6821 P1A. The back aide of tha board eccoajodatea 78as 
and 79vv voltage regulatora and heat einke. 

Tha P1C01UC aonitor haa 17 ccnaaanda and 24 1/0 aubroutlnoa to 
aiajplify downloading and debugging* A atandard 5.25" diakatte 
providoa aourca and object code for a WWLOAD utility for 
Flex uaara. (PlemHa a tradeaark of Technical Syettmi 
Conaultanta, Inc.) Coajprehenaive docua>entat ion (92 pagva) 
deacribaa operation and ajodif ication opt iona in detail, and 
includea aourca eode for F1C0B0G and ftTVWLOAO. 

A ribbon cable with DS~25S eonoector* a power eable and all 
heat ainka are included in the purchaae price of S395. 



(ClaSSifiedS As ^^^^^ ' No Guarantees ^ 



DAISY WHEEL PRINTERS 

Qumc Sprini 9 - $900 Qumc Sprint 5 - $800 

HARD DISK 10 Megabyte Drive . Seagate 
Model #412 $275. 

3 - Dual 8" drive enclosure with power supply. New 
in box. $125 each. 

5 - Siemens 8" Disk Drive . $100 each. 

Tano Outpost II, 56K, 2 5 H DSDD Drives, FLEX, 
MUMPS, $495. 

TELETYPE Model 43 PRINTER - with serial 
(RS232) interface and full ASCII keyboard. $250 
ready to run. 

SWTPC S/09 with Motorola 128K RAM. 1-MPS2, 
1-Paralell Port, MP-09CPU Card - $900 complete. 

(615) 842-4600 MP 9AM to 5PM EST 

• a* 






68000 Development 
Etc.^SlOO and up- 
914-297-7686 
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Omega . . . The Desktop Mainframe 

12.5 MHz MC68020 32-bit microprocessor & MC68881 FPCP as standard. 

1 megabyte of non-volatile, zero wait-state STATIC RAM and 128k/256k bytes ROM. 

25.5 megabyte (unformatted} Winchester Hard disc as standard. 

1.0 megabyte (unformatted) DS/DD 80 track floppy disc drive (specify 5V4" or 3W). 

Five RS-232C serial ports (one may be configured as an RS-485 network node). 

One Parallel printer port and one 16-bit bi-directional parallel port. 

Non-volatile clock calendar and power supply supervisor. 

OS-9/68KTM 'Professional' with full MC68881 FPCP support and 'C compiler. 



OMEGA/12.5/OS 
OMEGA/1 6.6/OS 
OMEGA/1MB 
OMEGA/SER9 
OMEGA/GRF 



OMEGA w/12.5 MHz 020 881 &OS-9/68K f M 



$4750.00 



OMEGA w/16.67 MHz020/881 & OS-9/68K ™ $4950.00 

1 megabyte additional STATIC RAM $ 895.00 

9 port RS-232C serial expansion board $ 645.00 

640x480x4 bits/pixel ACRTCgraphicsl/F $ 925.00 

PRICES INDICATED INCLUDE SHIPPING AND APPLY TO U.S. CUSTOMERS ONLY 



c 



VISA/MASTER CARD ORDERS ACCEPTED 



) 



OS-9 is a trademark of Microware Systems Corporation 
NON-U S CUSTOMERS SHOULD CONTACT THE NEAREST DEALER FOR PRICE & DELIVERY INFORMATION 
NORTH & SOUTH AMERICA ALL OTHER ENQUIRIES CONTINENTAL EUROPE 



LLOYD I/O INCORPORATED 
19535 NE GLISAN 
P.O. Box 30945 
PORTLAND, OR 97230 (USA) 
TEL: (503) 666-1097 
TLX: 9103805448 LLOYD I O 



WINDRUSH MICRO SYSTEMS 
WORSTEAD LABS. 
N.WALSHAM, NORFOLK 
NR28 9SA, ENGLAND 
TEL: (0692) 404086 
TLX: 975548 WMICRO-G 



SNIJDER MICRO SYSTEMS 
SCHOOTEINDSEWEG 8a 
5756 BD Vlierden 
The NETHERLANDS 

TEL: (0)4930-11975-13666 
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OS-9" 
User Notes 



By: Peter Dibble 

The publishers of 68* Micro Journal are proud to pake 

available the publication of Peter Dibbles 

0S9 MSIM BOTES 

Info rmat loo for the ilCDTNER to tbe PIO, 
tegular or CoCo 0S9 

Using 0S9 

HELP, HINTS, PROBLEMS, REVIEWS. SUGGESTIONS, COMPLAINTS, 

0S9 STANUARDS. Generating a Ntw Bootstrap, BulJding a 

new Syaten Disk, 0S9 Users Group, etc. 

Program interfacing to 0S9 
DEVICE DESCRIPTORS, DIRECTORIES, "FORKS", PROTECTION, 
"SUSPEND STATE", ^PIPES', "INPUT/OUTPIT SYSTEM", etc. 

PYograsvdog Laoguages 

Assembly Lsngusge Programs and Interfacing; Baslc09, C, 

Paacal, and Cobol reviews, program*, and uses; etc. 



Disks iMdvde 
Bo CTpiag all tbe Source Listings in. Source Code end, 
where applicable, assembled or compiled Operstlog 
Pregrasi. The Source and the Discussions In the 
Columns can be used "at la", or as * "Starting Point" 
for developing your OltH more powerful Programs. 
Programs sometimes use multiple Languagea auch aa a 
ahort Assembly Language Routine for reading a 
Directory, which la then "piped" to a Baalc09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeset -- w/ Source Listings 

(3-Hole Punched; 8 x M) 

Deluxe Under -S5.50 



All Source Listings on Disk 




l-IT SS, SD Disk - 
2-5" SS, DP Disks 



$14.95 
$24.95 



FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publishers of 68 MICRO JOURNAL are proud to 
ke available the publication of Ron Anderson's FL&I 
NOTES, In book form. This popular monthly column 
has heen a regular feature In 68* MICRO JOURNAL SINCE 
1979. It haa earned the raapect of thousands of 
68 MICRO JOURNAL readera over the yeara. In fact, 
'a column haa been described sa the 'Bible* for 68XX 
users, by some of the world's leading nicroprocessor 
professionals. The most needed and popular 68XX book 
available. Over the years Ron'a column has been one of 
the moat popular in 68 MICRO JOURNAL. And of courae 
68 HICRO JOURNAL la the most popular 6BXX magszine 
published. 

Listed below are a few of the TEXT files included in the 
book and on diskette. 

All TEXT files in the book are on the disks 

LOGO Cl File toad program to Offset memory — ASM PIC 

MEMOve Cl Memory move program _ ASM PIC 

DUMP Cl Pnniet dump program — uses LOGO — ASM P»C 

SUBTEST Cl Simualon ol 6600 code to 6609. show Oftonaro* — ASM 

TERMEM C2 Modem input to disk (or other port *put to Otsk) — ASM 

M C2 Output a liis to modem (or another pod) — ASM 

PRINT C3 Parallel (enhanced) printer driver — ASM 

MOOEM 02 TTL outpul to CRT and modem (or other pod) — ASM 

SCIPKG C1 Sceniihc math routines — PASCAL 

U C4 Mmr.momiof. disk resident many useful Junctions — ASM 

PRINT C4 Parallel pnnter dnve*, withoul PFLAG — ASM 

SET C5 Sel pr»nter modes — ASM 

SETBAS1 C5 Sel printer modes — A-8ASIC 

NOTE: -C1..C2, etc. -Chapter I, Chapter 2, etc. 

"Over 30 TEXT files included Is ASH (a a eembler)- PASCAL- 
PIC (poaltlon Independent code) TSC oASIOC, etc. 

Book only: $7.95 + $2.50 S/H 
With disk: 5" $20.90 + $2.50 S/H 



With disk: 6" $22.90 + $2.50 S/H 
Shipping AHio(mflg$3X)pefBiaXS2 30poDi3llsei 
Foreifn Onfeis Add $4 50 Surfact MaU 
or $7 00 Air Mai] 

If paying by chock . Please allow 4-6 weeks dcirvny 
• AD Currency in U.S. Dollars 

Continually Updated In 68 Micro Journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



"FLEX Is s trademark of Technical System* Consultsnts 

"OS9 is s trademark of Mcroware end Kotorola 

"6tf' Micro Journal la a trademark of Computer Publishing Inc. 



(615)642-4601 

Telex 5106006630 
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Cad for Software: 

68000, C, Basic09 
Sculptor 



We are receiving calls and letters from numerous 

sources, including users, business and olhers 
looking for OS-9 68000 software; applications, etc. 

Many of you have developed software 1hat with 

little change could be adapted for olhers. If you 

are interested In selling It, please let us know. Ihere 

Is a growing market out there now. Get In on 1he 

ground floor, 

If you can use additional income and have some- 

Ihfng lhat might be of interest, caH and talk to Lary 

or Don. 

S.E. MEDIA Division - CPI 

POB 849 
Hixson, TN 37343 

Telephone (615) 842-6809 
Telex (510) 600-6630 



SK* DOS 

Thm QfffK DOS " lor 6B000 application* in 

*V Industrial Control 

* Business Use 

s> EdueiliOA*) Computing 

* Scientific Computing 
sY Number Crunching 
s> Dedicated Systems 

* Turnkey Systems 
sY Oate Collection 

* Singlc-boerd Computers 

* Bui or tamed Computers 
sY Graphics Workstations 
tY One o I • kind Svftem* 
sY Advened Hobbyiil Use 

SK*OOS if a f ingle-user di»fc opeisCing system lor computers using Maletolt 32 bit CPUi 
such es the 68008. 5800Q. 68010, end 68020, It provides the power of e lull DOS. yet is 
triple end e**v to vm, end will rvn on tynffnj from 32K to 18 megabyte*. Because 
SK*OOS i» ««iily implemented on e nwm System, we cell it "The Generic DOS" wh,:h 
allows prograrnt written lor one system 1o be ran on meiiy others 

SKttDOS comes with over 40 com mends end system programs. inctudJnge 6809 emuleio* 
which eMows 6BK SK mOQS lo run application programs and languages developed lor 6809 
SK*DOS and other systems. Assemblers editon. and higher level ler>guaot support are 
available Irom third party sol t ware vendors and through public domain loliware 

SK*OOS is available for smoJe-copy or dealer sates, as well as OEM licensing Single copies 
con $125 (inquiie es to available Systems) Extremely attractive OEM Ikeniing terms are 
also available. An optional Configuration Kit ccmiaim a detailed Configuration Manosi 
and two disks o I source code lor system adaptation, including source code lor i system 
monitor/debug ROM end ©that programs useful for adapting SK«DOS to new systems 

SK-DOS 




,t *»e«/ac*A» from 
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SOFTWARE SYSTEMS CORPORATION 



• O. BOX 309 . MT, KrSCa *V tf»4fl 
TELf* 6106016774 



SOFTWARE FOR 680x AND MSDOS 



SUPER SLEUTH DISASSEMBLERS 
EACH $99-FLEX 1101-O&9 SlOCKJNrFLEX 
OBJECT-ONLY versions: EACH tStVFLEX.OS^.COCO 
Inter ecevely generale aource on d»M with Ube)*, include xref. binary aditmo 
apeCify 6800,1, 2, J,5.B.fc6502 version of Z8O/BO80.5 version 
OSV9 vensn also pnxMEx* R£* lorm* oftta fie unde/ OS* 
COCO DOS available in 6800.1.2 .3.5,8 B/BS02 vereon <not aWVBOdO St omy 
NEW: 66010 dissembler $100-FLEX.OS'8<UNIFLEX,OS.'9.6BK.MSOOS 

CROSS-ASSEMBLERS WITH MACRO CAPABIUHES 
EACH $50 FLEX,OS/9,UNIFLEX.MSDOS, UNIX 3/S100 ALUS200 
specify: 160«.6502.6801.66W.B805.6809.Z8.Z80 ( 8048,805^085.6801 0.32000 
modular cresraa&emol eta in C, wilh load/onload utilises NOW: OS'9-68 K 

aourcstt for addriroa* $50 eacf). *t00 lor 3. 1300 lor el 

DEBUGGING SWULATORS FOR POPULAR 8BIT MICROPHOCE980HS 
EACH S7SFLEX $1 O-OS/9 S80MJNIFLEX 
OBJECT-ONLY venlone; EACH MO-COCO FLEX.COCO OS* 
mtarerirwty eatytasg pfo cea aor*, vx>uoeojtsaa3evr^ytom^m^ r bine/yt)daing 
epeeiy tor 6800/1, |1 4)6605. 6502. 6809 OS*. 280 FLEX 

ASSEMBLER CODE TRANSLATORS FOR 65 2, 680 /I. 6809 

6502 to 6809 J75-FLEX WS-OSVS J80UNIFLEX 

680tVt to 6809 6 6809 10 po%*on-ind ISO.FLEX 175-OS* S60-UNIFLEX 

FULL-SCREEN XBASIC PROGRAMS wHh cursor control 
AVAILAB E FOR FLEX.UNIFLEX, AND MSDOS 

C ISPI AY CiF Nf- RAT ORDOCUMENTOn |50 w SOurC*. SM w*thr>ul 

MAIL NO LIST SYSTEM f i00wsource> 550 wlmout 

IN VE NTOH Y WIT H WRP t 1 00 w eourC*. J 50 without 

TA80LA RASA Sr^^ADS^Crr f 1 00 waowrx* , *50 without 

DISK AND XBASIC UTILITY PROGRAM UBRARY 
$5 FLEX $30 UNIFI.EX'MSDOS 
•OH otaM sedan, sort oVedory masftasn man* calaloo. do oVe> sorts, 

rv^iuvsaesvomeorasl of BASIC pruy*" 1 - »■* BASC ptvam, etc 
norvFLEX vsjttma exiude Son ami i map mxm only 



DISKETTES & SERVICES 

5.25" DISKETTES 
EACH 1 -PACK $12.50 SSSD/SSDD/DSDD 

American made, ovaranend 1 00% o^»*fy. wrgi T yvek pcMs . rvb r^BB, and laoott 



ADDmONAL SERVICES FOR THE COMPUTING COMMUNITY 
CllSTOMBED PROGRAMMING 
we w« cusionaze any of me pnjgyama (kdcntaid n tfaa «**«Tts^Tvtnor4nour 
tyatfsjr&kjr speciatasid aa^rmm use or to cover now pTSXVS«or».thecnar w « 
lor tuifi cuetomuaaon oapersis upon the nunUbr^ of Ifte rwdfteatiorss 

COrfTHACT PROGRAMMING 
we vwi crease new programs a modify exsano programe on a contract basis, 
a service we neve p/ovsded lor over Twenty years: tha rxs^Mervonwrscnwe 
haveovtfTTsad corsjtaK) po^amms-q) esdude most pocUar models o< 
mavrVramee, »ndwd»ng |8M. Burroughs. Ursvec, Noneyw«e. moat popuiai 
models of mvstnmpus*«L «>duo1rg DEC. BM, DO. H». AT&T, and mo* 
popular brand* 0< nueroexsmpurersv ff^udmg 6800/1. 6609. ZOO, 6502. 
68000. u&ng rr^fl a yum*t^e tanquapfli and (***<&** *V*m* on syftems 
rdnQtog e> size from Uroje WeCT>ie*u>i La t u ns to«r>flfe board oontroiers. 
the charoe for eonbact programming « usuaCy by me hou» or by the las* 

CONSULTING 
we offer a wide range of bvarsss* and teCHso) oxF^^ong servrss, usduano 
semsnar^. advice, training, and desejr i. on any topic related to cemputec*: 
trie ersarge lor eonauaa^g <s normaJy based uoon crrw. travel, and e 



CMOOEM THl^COtAasJNCATICmtS PROGRAM 
$l00.FLEX,OS/9,UNIFLEX.MS.OOS,OS/9-68K,UNIX 
OB ECT ONLY vers one EACH SS0 

manii-drwen wen is™*!* modev file transfer. 1+OOEM7. XON-XOf F. etc 
tor COCO and rxrvOOCO; Ohuas esaarsal COCO moduli portupt)84O0 Baud 



Computer Systems Consultants, Inc. 

1454 Latla Lane. Conyera, GA 30207 

Telephone 404-483-4570 or 1717 

We take ordere at any time, but plan 
long discussions after 6, it possible. 

Contact ua about catalog, dealer, discounts, end services. 
Most progrema In source: give computer, OS. disk alze. 
25% olf multiple purchases of eame program on one order. 
VISA and MASTER CARD accepted; US (unde only, please. 
Add GA aalea l»x (II In GA) and 5% shipping. 
(UWJfl£X si» Tedvssa* Svsaarr* ConsiAaras. OS* Mt*^^e.C»OOTanoy>i300SMioo«o<t 
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.. , "TOPS 

NOW' TRa OFFffCE PMNT Stoop*' 



Makes professionals of us all. 
For less than just affordable! 



DeskTop Publishing 



NOTE: The following includes a 3 day, hands-on , instructional session for the 
entire "The OFFICE PRINT Shop 1 "' system. A fiill 6 months, no extra charge, 
telephone or in-house (our offices, normal business hours) follow-up advisory 
service. We feature full Apple™ service and also national service by Honeywell. 
This includes next day t on site service. Over 95% of all service requests are com- 
pleted on the initial call. We understand the importance of fast service! 



100 



(^ Sy stem 100 Very Affordable Save up to 90% on your printing J 



The TOPS System 100 

consists of the following items: 
•A special Apple Macintosh Plus™ 1 Megabyte computer, including 
a double sided, double density 800,00&f character disk drive. 
An Apple LaserWriter™ typeset quality printer. 



Page make-up software 

galley typesetting software 

3 day - on site - instructions 

6 months instructional support & 

much morel 



"%> 



We also offer software to drive 
most all the large commercial typesetters. 
You can save a bundle by doing your own 
typesetting and proofing, and then down- 
loading to the commercial sysirTW. 



Leasing with payout available for all systems. 



C 0-B Also available with 20 million character storage Tlard Disk 1 J 

Data-Comp Division 




v. 



A Decade of Quality Service* ^ 

J ^^^^pj^ Systems World-Wide 

Computer Publishing, Inc. 5900 Cassandra Smith Road 
Telephone 615 842-4601 - Telex 510 600-6630 Hixson, Tn 37343 



— 




This document composed, typeset and prinUJ with a TOPS System 100 

WPS 71* OFVtCEr*m Shop k*b*dua^aiCaii*~ ******, hx. 
AfpU M«a«mA Pirn k ft **Wm* of Apple Cmy^ Qn^, kc 
LamtWritur k * wkart of Appte < 
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OS-9 UniFLEX 

MUSTANG-020, 68020, 68881 AND MORE 

HANDS-ON EXPERIENCE 

NOW SK*DOS available 

The DATA-Comp Division of Computer Publishing Corporation announces their new and 
innovative HANDS-ON 68020 computer familiarization two day event. A chance to TRY 
BEFORE YOU BUY! 

For two full days (Monday through Friday - excluding legal holidays) each participant will 
be furnished the exclusive use of a 68020 computer (MUSTANG-020). Each system will 
have available native C compilers, BASIC, assembler and other high level languages. Each 
system will be equipped with the Motorola MC 68881 math coprocessor, where 
applicable. 

Each demonstration room will contain not more than two work stations. Each system will 
be equipped with floppy disk, 20 megabyte Winchester technology hard disk, and 2 
megabyte of RAM. RAM is partitioned as 690K bytes of RAM disk and 1.2 megabyte of 
user RAM space. 

Participants are encouraged to bring along any source level projects, for evaluation, in C, 
BASIC or assembler. Call for availibility of other HHLs. 

Although this is not a training seminar, Data-Comp personnel are available for assistance 
and consultation. This event is scheduled for hands-on evaluations of the 68020 CPU, 
68881 math co-processor and MUSTANG-020 system, operating in a functional 
environment. 

Transportation to and from the airport and hotel/motel will be provided. Lunch provided 
both days. Chattanooga airpon is serviced by American, Delta, Republic and other airlines. 



COST 

One person - $375.00 
Two persons - $595.00 




* Motel single $22.00. double $26 00 
Includes satellite TV . convenient to food and shopping 




DATA-COMP 

A Division of 
Comp ter Publishing, Inc. 

5900 Cassandra Smith Road 
Hixson.Tn 37343 
Telephone 61 5 842-4600 
Telex 510 600-6630 



Systems available for both OS-9 and UniFLEX. Reservation should be made 15 days in 
advance. Attendee should initially indicate OS-9. UniFLEX or both. Special facilities 
available on request. Please write or call for additional information. 

NOTE: Both OS-9 and UniFLEX are Unix type operating systems. Each as been enhanced 
in some aspect or another. Prospective attendees should nave some working knowledge or 
experience with one of these operating systems* to gain full benefit of the session. 
However, a newcomer will find that it is a simple matter to be fairly proficient in using these 
systems in the allocated time. Special system instruction available on request. Call or 
write. 

* Hotel/Motel cost are separate cost, not included in the basic coat shown. 
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The 

Users' 
Group 



Public Domain Software 
Library Directory 

Now Available! 



Connote descriptions and crass- referenced index for Thousands 
ol C Source Prog**** in The C Users' Group Library. <s» twm 

A quick end handy reference for loceiing public domain editors* 
tern formatters. compters, UNIX-like tods, etc, all in C. 
Indeiae prograrm for CP/M, UNIX, ar>d MS DOS 



ihCUwi 

poee*v 

litl uw 



The LAB 6809 Helps you prototype your design in less time, 
for less money. Easy to use and easy to modify, the LAB 6809 
is the optimal development tool for 6809-based applica- 
t Kns with high performance objectives. 




□ Use as sland-alorie or syslem CPU 68809 jumper selectable for 1 
or2MH2ri2MHilA3wiU»oulwailslalBs1oron-boafddev)cesr]66B50 
RS-232C senal port Don board provisions lor additional 6950. 6940 
692V olher I/O devices P1C0BUG moritor provides I/O and debug- 
ging routines ; I22sq in user winewrap area gold pta(edSS.5DCon 
necto* $ 1 comprehensive documentation 

Put the LAB 6809 to work on your next project. $395. 

ShOprtQ and handling $10 (US) S?o<ou1tideUSl Te*es res.dentsada sates 
la* Ma BlerCard. VISA accepted Technics* bo | fehn available on request 
Dealer nqurfes #>vt**j 



* 



IN1BUJC€NJ TOOLS FOR 
iNTfl l fOfNT CONTROLS 



1606 Wesl UthStreet Austin, TX 78703 512/477*6809 



artafled Systeme Wortd-Wk* 



OV£fl 10 VtAflS Of Of OtCATf OUAUTYi 



DATA-COMP 
SPECIAL 



r # A Division of 
9 CompAtrr I'uNLihiftK. Inc. 
5900 Casundra Smith Road 
Hitson.Tn 37343 
Telephone 6t5 842 4600 
Tate* 510 600-6630 



Heavy Duty Power Supplies 

For A limited time we are offering our HEAVY DUTY SWITCHING 
POWER SUPPLY. These are 8RAND NEW units and will not fast 
long. Also note that these prices are less than 1/4 the normal price 
for these high quality unit. 



Sise: I&S iSxl5 vcaos * tedutinf oee»y xbocoiibj 
tread and hcafltiak, 

Rat&of: d 110/220 volt* sc {pap change) OUL 130 ««&• 

OuQSiC »5v * 10 tssw 

♦ |> -4j0 amp* 

♦ 12v-2j0 leap* 
-12* - OJ un 



Maqdi O^^^^s. Temioil crip 

Load t urnout*: Auacaomx short asm* rKorey 

Each 

SPECIAL: $59.95 
2 or more 49.95 

Add:$7 50oachSfH 



Mtkt: Itotchjpt 




So* 1073 k 6,2 1 125 i 

Rjtdt 1 107220 at (tfrsp diafifa) Out SI i 

♦ I2v 14 enpi 
*12r.Z)araps 

-I2v • 0.4 «**» 



MaonfC 

Load Radasr Aitfomint ibort cama i mngj 

eadb 

SPECIAL: $49.95 
2 OR MORE 39.95 

Add $7.50 S/H each 
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sbO^' $197.50 

EDUCATIONAL AND STUDENT PRICE 



B^^* 5 *™ 





The Power of a 68000 in one compact and efficient unit 
for hardware interfacing and machine language programming 

(a self 'Contained laboratory) 



FEATURES: 

• 68000 H P 

• 4 K SRAM 

• 8 K EPROM 

• LED Display 

• Integral Keypad 

• Operating System 

• Cassette Interface 



Mm 



OPTIONS: 

• PADC-DAC-8 liLAB' 
8 Ch A/D, 8 Ch D/A, 8 Bits 

• Wire Wrap Expansion Board 

• Digital Signal Processors 

• and more . . . 



fjLAB and Notebook Computer 
are trademarks of URDA 



TO ORDER: Call QUASITRONICS 
at 1-800-245-4192 IN PA (412)-745-2663 



QUASITRONICS 
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Information 

Management 

System 



CSG-IMS is a full featured relational database 
manager with the added benefit of a comprehen- 
sive structured application language. This com- 
bination makes CGS-IMS the ideal development 
tool for file intensive applications. Sophisticated 
applications can be developed in a small fraction 
of the time required for traditional languages. 

- Interactive access to databases and quick ad 
hoc queries. 

- CSG-IMS includes a recursive compiled 
language supporting program modules with 
full parameter passing. 

- User defined screen and report formats. 



PRICES: 

CSG-IMS for OS9 6809 Lll $495 

CGS-IMS for OS9 68000 $495 
CSG-IMS for CoCo3 OS9 (single user) $200 

CSG^MS for CoCo (OS9 level 1 ) $1 50 

CSG-IMS demo with manual $30 

Shipping North America $5 

Shipping Overseas $10 



Visa 



Mastercard 



ORDER FROM: 

Clearbrook Software Group 
P.O. Box 8000-499 
Sumas, WA 98295 
(604) 853-91 1 8 BBS (604) 859-1 266 
OS9 Js a trademark of Mjcroware and Motorola Inc. 

- Record, index and file size almost 
unlimited. 

- Text, BCD floating point (14 digit), short and 
long integer an'd date types. 

- Run-time interpreter available. 

- Comprehensive 320 page manual/tutorial. 



!!! Subscribe Now !!! 
68 MICRO JOURNAL 



Subscription Rates 
U.S.A.: 1 Year $24.50, 2 Years $42.50, 3 Years $64.50 
♦Foreign Surface: Add $12.00 per Year to USA Price, 
♦Foreign Airmail: Add $48.00 per Year to USA Price. 
♦Canada & Mexico: Add $9.50 per Year to USA Price, 
♦U.S. Currency Cash or Check Drawn on a USA Bank ! 



68 Micro Journal 

5900 Cassandra Smith Rd. 

POB849 

Hixson.TN 37343 



OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Mastercard □ VISA □ 

Card # Exp. Dale^ 



Telephone 615 842-4600 
Telex 510 600-6630 



B 



For 1 Year 2 Yeats 


3 Years _ 


Enclosed: $ 




Name 




Street 


City State 


Zip 


My Computer Is: 
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OS-9 



•OfTWAJIt 



L1 UTILITY PAK— Contains all programs formerly in 
Filter kits 1 & 2, and Hacker's kit \ plus several 
additional programs. Complete "wild card" file 
operations, copies, moves, sorts, del. MACGEN shell 
command language compiler, Disassembler, Disk 
sectoredit utility, new and improved editions, approx, 
40 programs, increases your productivity. Most 
programs applicable for both level I & II 6809 OS-9. 
$49.95 ($51.95) 

Call or send Self Addressed Stamped Envelope for 
catalogof software forcolor Computer OS-9 and other 
OS 9 systems. 

BOLD prices are CoCo OS-9 format disk, other formats 
(in parenthesis) specify format. All orders prepaid or 
COD, VISA and MasterCard accepted. Add $1.50 S&H 
on prepaid, COD actual charges added. 

SS-50C 

MEMORY LIQUIDATION SALE! 

(While Supply Lasts) 

1 MEGABYTE RAM BOARD 

Full megabyte of ram with disable options to suit any 
SS-506809 system. High reliability, can replace static 
ram for fraction of the cost. $399 for 2 Mhz or $439 for 
225 Mhz board assembled, tested and fully populated. 

2 MEGABYTE RAM DISK BOARD 

RD2 2 megabytes dedicated ram disk board for SS-50 
systems. Four layer circuit board socketed for 2 
Megabytes* Special sale price of $399.00 includes only 
256k of ram installed (you add the rest), includes OS-9 
level I and II drivers for Ram disk, (note: you can re- 
boot your system without losing ram-disk contents). 
(Add $6 shipping and Insurance.) 

Please call for answers to your technical Questions 
concerning these products. 

D.P. Johnson, 7655 S.W. Cedarcrest St. 

Portland, OR 97223, (503) 244 8152 

(For best service call between 9-11 am Pacific time.) 

OS-9 Is a trademark of Microwave and Motorola Inc. 
MS-DOS la a trademark of Microsoft Inc 






J 



COMPILER EVALUATION SERVICES 

BY: Ron Andcra 

The S.E. MEDIA Dlvttoa of Computer 

Pubtlrfiing Inc. 

b offering Che fotknring SUBSCRIBER 

SERVICE: 

COMPILER COMPARISON AND EVALUATION REPORT 

Due to the constant and rapid updating and enhancement 
of numerous compileis, and the different utility, appeal, 
speed, level of communication, memory usage, etc., of 
different compilers, the following sei vices are now being 
offered wiith periodic updates. 

This service, with updates, will allow you who are wary or 
confused by the various claims of compiler vendors, an 
opportunity to review comparisons, comments, 
benchmarks, etc., concerning the many different 
compilers on the market, for the 6809 microcomputer. 
Thus the savings could far offset the small cost of this 
service. 

Many have purchased compileis and then discovered that 
the particular compiler purchased either is not the most 
efficient for their purposes of does not contain featuies 
necessary for their application. Thus the added expense 
of purchasing additional compilers) or not being able to 
fully utilize the advantages of high level language 
compilers becomes loo expensive. 

The following COMPILERS are reviewed initially, more 
will be reviewed, compared and tanchmarted as they 
become available to the author: 

PASCAL XT GSPL WHIMSICAL PL/9 

Initial Subscription * $39.95 

(includes I year updates) 
Updates tor 1 year * $1450 

S.E. MEDIA * C.P.L 

5900 Cassandra Smith Rd. 

HixsomTN 37343 

(615) 842-4601 







68000 68020 68010 
68008 6809 6800 

Write or phone lor catalog. 

AAA Chicago Computer Center 

120 Chestnut Lane — Wheeling IL 60090 
(312) 459-0450 



Ttcrtnlcal ConiuttaHon ivillibl* motl WMkdiyi from 4 PM lo I PM C8T 
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Stop! 

Get a 25 
MegaByte Hard 
Disk practically 

FREE - only 1 C 

Be Sure to Consider the 

SPECIAL MUSTANG 

10 Sale on page 5 

When it's over, IT'S OVER! 

We dont know how long this very, very low price can be maintained, donl miss itl 

Data-Comp Div. - CP1 

'68' Micro Journal June "87 61 



6809<>68XXX 
UniFLEX 

X-TALK 

A C-MODEM/Hardware Hookup 

Exclusive for the MUSTANG-020 running 
UniFLEX, is a new transfer program and cable set 
from DATA-COMP (CPl). X-TALK consist of 2 
disks and a special cable, this hook-up enables a 6809 
SWTPC UniFLEX computer to poit UniFLEX files 
directly to a 68XXX UniFLEX system. 

This is the only cuirently available method to 
transfer files, text or otherwise, from a 6809 
UniFLEX system to a 68000 UniFLEX system, that 
we have seen. A must if you want to recompile or 
cross assemble your old (and valuable) source files to 
run on a 68000 UniFLEX system. GIMIX users can 
directly transfer files between a 6809 GIMIX system 
and our MUSTANG-020 68020 system, or GIMIX 
68020 system. A1J SWTPC users must use some son 
of method other than direct disk transfer. The 6809 
SWTPC UniFLEX disk foimat is not teadable by most 
other 68000 type systems. 

The cable is specially prepared with internal 
connections to match the non-standard SWTPC SO/9 
DB25 connectors. A special SWPTC+ cable and 
software is also available, at the same pi ice. Orders 
must specify which type SWTPC 6809 UniFLEX 
system they intend to transfer fiom or to. 

The X-TALK software is famished on two 
disks. One 8" disk containing the 6809 software and 
one 5" disk containing the 68XXX software. These 
piograms are also complete MODEM programs and 
can be used as such, including X-on X-off, and all the 
other featuies you would expect from a fall modem 
program. 

X-TALK can be purchased with/without the 
special cables, however, this SPECIAL price is 
available only to registered MUSTANG-020 owneis. 

X-TALK, w/cable $99.95 
X-TALK only 69.95 

X-TALK w/source $149.95 

DATA-COMP 

5900 Cassandra Smith R<1 

Hixson, TN 37343 

Telephone 61 5 842-4601 
Telex 510600-6630 



Note: Registered MUSTANG-020 owners musl furnish system 
serial nurrfcer in order lo buy al these spedal low prices. 



68 MICRO JOURNAL 
Reader Service Disks 

Disk- 1 File sort, MinicJt, Minicopy.Minifms, "lifetime, 

••Poetry, ••Foodlist, ••Diet. 
Disk- 2 Diskedil w/ insLft fixes. Prime. •Pimod. 

••Snoopy, ••Foothill. ••Hexpawn,** Life time. 
Disk- 3 Cbu809. Seel, Sec2, Find, Tabic 2, Intcxl, Disk- 
ex p, •Disk i«ve. 
Disk- 4 Mailing Program. •Finddat, •Change, *Testdi4c. 
Dlsk^ 5 •DISKFDC l.*DISKFIX 2, ••LETTER, 

••LOVESIGN, ••BIACKJAK. "BOWLING. 
Disk* 6 ••Purchase Order. Index (Disk file indx). 
Disk- 7 linking Loader, Rload. Haikness, 
Disk- 8 Crtest. Ianpher (May 82). 
Disk- 9 Datecopy, Diskfix (Aug 82). 
Disk- 10 Home Accounting (July 82). 
Disk- II Dissembler (June 84). 
Disk- 12 Modem 68 (Msy 84), 
Disk- 13 •Iiutmf68, Tcstmf68, •Cleanup, •Dskalign, Help, 

Date.Txt. 
Dlak-14 •Iciit. •Tell. •Terminal, "Find, •Diskedit, Inil.lib 
Disk- 15 Modem 9 ♦ Update* (Dec 84 Gilchrist) lo Modem9 

(April 84 Com mo). 
Disk* I 6 Copy.Txl. Copy. Doc, Cal.Txt, Cal.Doc. 
Disk- 17 Match Utility , RATBAS, A Basic Preprocessor. 
Dlak-18 Paxse.Mod, Sixe.Cmd (Sept. 85 Armstrong), CMDC 

ODE. CMD.Txt (Sept. 85 Spray). 
Disk- 19 Clock, Dsie. Copy. Cat, PDQ^Asm A Doc. 

Gnura.Sys, Do, Log. Asm A Doc. 
Dlsk-20 UNIX like Tools (July A Sep*. 85 Taylor A 

Gilchrist). Dregon.C. Grrp.C. ISC. FDUMP.C 
Dlsk-2 1 Utilities A Games - Dale, lire. Madness, Touch. 

Goblin, SUnhoi, A 15 more. 
Diik-2 2 Read CPM A Non-FI-EX Disks. Fraser May 1984. 
Disk -23 ISAM, Indexed Sequential file Accessing Methods, 

Condon Nov. 1985. Exietmbie Table Driven. Un 

guage Recognition Utility, Anderson March 1986. 
Disk -24 68* Micro Journal Index of Aiticles A Bit Bucket 

Items from 1979 - 1985, John Current. 
Dlsk-25 KERMJT for FLEX derived from the UNIX verBiug 

Feb. 1986. (2)-5" Diika or (1)-8" Disk. 
Disk -2 6 Compact* UniBoard review, code A diagram, 

Builison March '86. 
Dlsk-2 7 ROTABlT.TXT. SUMSTBST.TXT. CONDATATXr, 

BADMEN.TXT. 
Disk -28 CT-82 Emulator, bit mapped. 
Dlsk-2 9 ••Star Trek 

Dlsk-30 Simple Winchester, Dec'86 Green. 
Dlsk-31 ••• Read/Wrte MS/PC-DOS (SK*DOS) 
Dlsk-32 Ilier-UNIX Type upgrade - 68MJ 2/87 



NOTE: 
litis ii a reader service ONLYI No Warranty is offered or implied, 
ihey are at received by 68' Micro Journal, and are for reader 
convenience ONLY (some MAY include fixes or patches). Also 6800 
and 6609 program* are mixed, as each is faicly limple (mostly) to 
convert to the other. Software if available to crosi -assemble all 

• Oatoiea 6800 - •• Odttcs BASIC 
**• Denote* 68000 - 6809 no indicator. 



Specify 8" disk $19.50 
5" disk $16,95 



Add: S/H - S3 50 
Overieai add; $4.50 surface - $7.00 Air Mail, USA Dollars 

68 MICRO JOURNAL 

PO Box 849 

Hixson, TN 37343 

615 842-4600 - Telex 510 600-6630 
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IF YOU NEED IT, WE'VE GOT IT! 
(OR WE'LL MAKE IT) 

Yes. PERIPHERAL TECHNOLOGY still sells the FO-2 for SS-SO Bus Computers And. il you don't 
need it, we sell other products from Single Board Computers to Systems which should Id your 
requirements Custom Hardware Design is also available. Here's a small sample of what we olferr 



FD-2 FLOPPY DISK CONTROLLER 

* Coniroti up to loci 5>V Drives 

* Runs in 1 Of 2 MHZ Systems 

* Can be con1»gured lor eHher 4 or 1 6 

* Addresses per I/O Stot 
<SS30 of S530C) 

* Uses WD2797 Controller Chip 
<COmpalibJa wrih 1771/I79X 
Controller Chip) 

* Hardware and Software compatible 
with SWTPC fJC-4 coniroUars 

* 6400/6000 Fie* Drivers available 

* SK'DOS Operaiing System or 
OS9/6609 Driver package 



PT69 4 SINGLE BOARO 
COMPUTER 

• 6909 E Processor/ 1 MHZ Clock 
» four RS232 Serial Ports using 

66 SOS 

• Two B-B«l parallel Porls us<ng 
6621 PIA 

• Time-OI-Day Dock I MCl 466 1 8} 

• 59K ol user RAM 

• 2K of 4K of EPROM uung 2716 
or 2732 

• Double S*deo/Doub«0 Deosriy 
Floppy Controller 

• Car Read/WM© Radio Shack 
OS/9 Diskettes 

• Board Size 6 6 K X a 2" 






MONTHLY SPECIAL 
FD-2 Floppy Disk Controller: $129.00 

Regular Price : $149.95 



PERIPHERAL TECHNOLOGY 

1 480 Terrell Mill Road, Suite 870 

Marietta. Georgia 30067 

(404) 964-0742 Telex # 880564 

VISA / MASfERCARO / CHECK /COO 



SYSTEMS 

• Floppy or Winchester Versions 
Available 

• Sysisms us* any 6809 Single Board 
Go<npUw Of 68008 Boafd 

• WiH be eonngured to meei your 
Require menls 

• OS9 6 SK'DOS Operating Syslems 

• Call of wriie for system 
ooohOuralKKis 




Catalogue* Available Upon Request 
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XDMS-IV 



j Data Management System 
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Save $ 1 00.00 - limited Time 
Regular $350.00.^fewrOr>fy 

$249.95 



TwbltlM) ufcphoM uktucB Td H4-MI-3U2 (Ennlap) 
*> I f \ - TkdIuI Sjvlaia Gratunb. SK'UOS™ STAR KTTS Cotp. 



FOR 6809 FLEX-SK-DOS(S/8") 

Up to 32 fr«*m£c*di per renedt Op to 12 frcaacr filed nnmeJ Up to 1024 bym nmds) Uier 
defined aaesi sod pnnt axfiiair FWn fuexl Form filesf Oaid&ana] rrennirwl Pmnu 
dudmnf) Upward/Downward file liakinfJ Fun joieinf I Random Hie viraal pafifli! Buih in 
utilities) Bulk in teal line editorl Bally session oriented! enXan<»d faomsl Boldhee, Double 
widih, Italics sod Underline supDoncdl Written in cweject Anaauxod userabkrt (/sxe/aied for 

X0MS-IV Data nianafveeit SftUm 

XOMS-IV Is s breed new approach to data management h not only pxmils usen la 
dscrihe, Ddler aid naixrvo date, bul also to (waex^ enure files producaof, ouuvruakl import*, 
icreen doplayi mod file outfuu Classing can consist of any of t ux <rf luuidmjd high level 
functions including record and Held mliactiao. sorting and igfjef ilion, lookups in other files, 
facial caoosauaf of record cuheeia. cu«an rcpu* fcamattinf, loialinf and tuh4aaliA§ ( ind 
(S^saaarks of up lo three rciAod files ss s 'daub— ■' on user defined Aaput iqus. 
FOWCRFUL COMMANDS! 

XDMS-IV eon^nam the fwrTK»*lu> </ many POpiUr DBMS softwsxe systems with i new ca»y 
lo use Ounmiand set into t ainfje inuafjitod pscksae. We\e included nuny new fcaturei *nd 
oommanda indodinf • set of fcnoal File utililias. The praosssing convnanda an? (npi.lPnKTxS' 
Oucpul (12*0) oBoated wbice allows a*nea ifltnt snpianemation of i prociss daitn. 
SBSelON ORIENTED! 
XDMS-IV is seaeon wieoioi Eater "XDMS" snd you are m instant aanmand of all (he 
featares. No toon wattiruj for ■ aamnend lo load in tram di^kl Many aatmnsnas «re aninediitc, 
such ss CREATE (file d4bc£c*>X UPDATE {file editor* AJROE snd DELETE (utiliuc.) 
Odxss see proosss asrunands which are used lo crmic t user praaaa which it eseeuuad with ■ 
RUN oomrnand. Gilhsr nriiy be entered into i *proonv" file which is ei<wuad by an EXBCUTU 
PnsMSses may esecuve other pn****^, or themeoivoi. either condiiioruDy or 
u y^ Mum and screen prompts are easily cnsasl, and entire user Afpl^oaa can be 
vinfXDMS-IVt 
ITSIA5YTOUSE! 

XDMS-IV seeps dtta manajemefli cimnieJ Rather thao detian • oaamlcx DBMS which hides the 
nue ninue of the dels, we kept XDMS-IV file orusned. The ueer view of data ralfttionabips ti 
prtBented in repnns and icreeo outp»t» white the acbial dtia nsidas in easy lo meintem files. Thi* 
arpoet pmniiK QmorruanJ pwamtiriop and repxett »Uhoul eomple* redefining of the ditsbsse 
fika and aOuoBe. XDMS-IV euy be used for a wide range of •pplkaboos from stmpkc reszvd 
nianjfoment aynams (addrfsaes. Urvneory -) to sKearetad daubeie systems (order entry, 
c^aaaint, The odk4«1u«» ai r unkmiied 

Vba & Master Card Excepted 

Telephone: 61544Z-4601 or TeSex: 510 60&4630 
Or Write: S£. Media, 5900 Ca«aodra Smith RdL, 
Htxmi, Tenn. 37343 
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GII1X Micro -20 

68020 SINGLE-BOARD COMPUTER 



Mainframe CPU Performance 
on a 5.75" x 8.8" Board 

(benchmark results available on request) 



$2565 



00 12.5 MHz Version 

Quantity Discounts Available 







Features 



32*Bit MC68020 Processor (12.5, 16.67, or 

20MHZ) 

MC6888! Floating-point coprocessor (optional) 

2 Megabytes of 32-bit wide, high-speed RAM 

4 RS-232 Serial 1/0 Ports (expandable to 36) 

8-bit Parallel 1/0 Port ('Centronics' compatible) 

Time-of-Day Clock w/ battery backup 

16-bll I/O Expansion Bus 

Up to 256 Kbytes of 32-bit wide EPROM 

Floppy Disk Controller for two 5V<" drives 

SASI intelligent Peripheral Interface (SCSI subset) 

Mounts directly on a 5'A" Disk Drive 

Optional Boards include Arcnet, Prototyping, I/O 

Bus adapter. 60 line Parallel I/O, RS-422/485 



Software 



Included: 

• GMX Version of Motorola's 0208ug Debugger with 
up/ download, breakpoint, trace, single-step, and 
assembler/ disassembler capabilities 

« Comprehensive Hardware Diagnostics 
Optional: 

UNIX m tike Multiuser /Multitasking 
Disk Operating Systems 

• OS-9 / 68000 v (Real-time and PROMable) 

• UniFLEX™ 

Programming Languages and Application 
Software 

• BASIC, C, PASCAL. ABSOFT FORTRAN. COBOL 
and ASSEMBLER 

• Spreadsheet, Data Base Management, and Word 
Processing 

COMPLETE EVALUATION SYSTEMS AVAILABLE 



GfTlX 1337 W. 37th Place Chicago, IL 60609 
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June*? 



(312) 92755 10 • TWX 910 221-4055 

State-of-the-Art Computers 

Since 1975 

'68' Micro Journal 







Now Offering "FLEX'* (2 Versions) 
AND 'STAR- DOS PLUS + " 




For Ordering C*ll 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 
The Folks u/ho FIRST Put FLEX* 
The CoCo 



on 




TSC Editor 

RtjtSOOO 
NOW $35.00 



DOS PLUS 4 

• Functions Same as FLEX 

• Reads - writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run "STAR-DOS'' 

• Over 300 utilities & programs 
to choose from. 



PLUS 
ALL VERSIONS OF FLEX & STAR DOS 




+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free Utlities 



INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoiy Examine Program 
+ Many Many More!!! 



TSC Assembler 

fUfttOOO 
NOW $3500 



Cora Disk Dnvp Susleuisl 



2 TH1NLINE OOUILB SIDED DOUILE DENSITY DISK DRIVES 
SYSTKH VlTN PDtJEI SWPLV .CAlINfcT, DISl OllVE CARLE. J4M 
NEW DISK CONTROLLER JPO-CP VJTfi J-DOS .US-DOS OPERATING 
SYSTEMS. $4*9.95 

Spidfy What CONTROLLER You W#nt JAM, or tADIO IHACX 



THINLINE DOUIt^ SIDED 
DOUILE DENSITY 40 TRACKS 



1 



Verbatim Diskettes 



Sinftle Sldtd Double Deoilty 
Daubl* Sided Doubl* Deotlty 



Cauli oilers 



J4N JPO-CP WITN J-DOS 
WITH J-OOS, RS-DOS 
RADIO SNACK J, I 

RADIO SHACK Dlik CONTROLLER 1.1 



Disk Dtive Cables 



Cflbl* for One Drive 
Cable for Two Drive* 



$179.9* 



$ 14.00 
* 14.00 



$139.95 
$159.95 
$114.95 

3134.93 



S 19.93 
S 24.93 



MK VPCRADt 

POR C.D.E.P, AMD COCO 11 
RADIO SHACK BASIC 1.2 
RADIO SHACK DISK IAS1C 1.1 

DISK OltVE CAR I NET PCJ1 A 
SINGLE DRIVE 

DISK DRIVE CABINET POR TWO 
TK INLINE DRIVES 



niVTCRJ 

EPSOM U-RO 
EPSON MX-70 
EPSOM KX-lOO 

acojmmue* not ipso* 

6 J 46 2K SEllAL BOARD 
6 J 49 32K EXPAND TO J 26K 
EPSON MX -AX- HO KI150NS 
EPSON LX-80 Rl IRONS 
TEACrOR UNITS POR LX-80 
CARLES 4 •THEN INTERSACKS 
CALL POR PRICING 



$ 29.95 

$ 24.93 
I 24.93 



I 49.93 
$ 49.95 



4219.95 
IU3.95 
$495.95 



$ R9.95 
$149.95 
$ 7.95 
I 5.93 
I 39.95 



DATA-COMP 

5900 Cassandra Smith Rd 
HiKson. TN 37343 
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SHIPPIN6 

USA ADD 211 

FOREIGN ADD 5» 

MIH. %2$Q 


(615)842-4600 

f Of Ofdvftng 

Telex 5106006630 


S 









S - 50 bus / 68XX 



Board and/or Computer 

Terminals-CRTs-Printers 

Disk Drives-eta 

REPAIRS 



DC 



NOW AVAILABLE TO ALL SSO SSXX USERS 

The Data- Com p Division of CPI ts proud to announce the availability of fteir 
service department facilities to 'ALL* SSO Bus and 63XX users Including all 
brands, SWTPC * GlMIX - SS8 - HELIX and others, including the single board 
computers. "Please note that kit-built components are a special case, and will 
be handled on an individual basis, it accepted. 

1 If you require service, the first thing you need to do is call the number 
bo low and describe your problem and confirm a Data-Gomp service & shipping 
numbed This is very important, Data-Comp wi'.l not accept or repair items not 
displaying this number* Also we cannot advise or help you troubles hoot on the 
telephone, we can give you a shipping number, but NO advice? Sorry 1 

2 All service shipments must include both a minimum $40\0Q 
estimate/repair charge and pre-paid return shipping charges (should be same 
amount you pay to ship to Data-Comp). 

3 If you desire a telephone estimate after your repair item Is received, 
include an additional $5.00 to cover long distance charges. Otherwise an 
estimate will be mailed to you, il you requested an estimate Estimates must 
be requested Mailed estimates slow down the process considerably. 
However, It repairs are not desired, after the estimate is given, the $40 00 shall 
constitute the estimate charge, and the itom(s) will be returned unrepaired 
providing sufficient return shipping charges were included with the item to be 
serviced Please note that estimates are given in dollar amounts only. 

4 Data Com p service is the oldest and most experienced general 
S50V68XX service department in the world. We have over $100,000.00 in parts 
in stock We have the most complete set of service documents lor the various 
S50/6BXX systems of anyone - YET, WE DO NOT HAVE 
EVERYTHING! But we sure have more than anyone else We repair about 
90% of all items we receive CalJ for additional information or shipping 
instructions. 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson.TN 37343 
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Not This 




(615)842-4607 
Telex 5106006630 



